Select Code to Download

#!/usr/bin/perl
#
...
string 30.0/s     --   -70%   -99%
regex  99.9/s   233%     --   -97%
hash   3704/s 12230%  3607%     --

package Letter;

...
my $l = new Letter("F");
$l--;
print $l;