$count{$letter} = ()= $$seq =~ m/$letter/g; [download]
In reply to Re^3: perlkhan 77 by Anonymous Monk in thread perlkhan 77 by perlkhan77