Re^2: Golf code in perl

in reply to Re: Golf code in perl
in thread Golf code in perl

And for 40:

print<>!~($/=$")+2*map 1..$s{$_%$'}++,<>

Comment on Re^2: Golf code in perl Download Code

In Section Seekers of Perl Wisdom