Help for this page

Select Code to Download

Select or download this

my %hash;
while (<>) {
...
            if $hash{$_}++;
    }
}