Hi,
I'm learning Perl and for now I'm on regexp. With my friend, we make some challnages for shortest code. We have such a task: We are given some words (of length at most 20). These words are made only from capital letters (A..Z). We want to count and print out 2**(number of letters A,B,C,D)...