> 674562.pl foo
foo in /tmp/*.pl:
Use of uninitialized value in pattern match (m//) at 674562.pl line 26.

##</code><code>##

                if ($this =~ /$bit/) {

##</code><code>##

    my @rank = sort {$hash{$b} <=> $hash{$a}} keys %hash;