Select Code to Download

johngg@shiraz:~/perl/Monks > perl -Mstrict -Mwarnings -E '
my $str = q{BEBEBEHUHUHUJJFAFALL};
...
HU -> 3
JJ -> 1
LL -> 1

johngg@shiraz:~/perl/Monks > perl -Mstrict -Mwarnings -E '
my $str = q{BEBEBEHUHUHUJJFAFALL};
...
JJF -> 1
UHU -> 2
UJJ -> 1