Select Code to Download

use strict;
use warnings;
$| = 1;
...
    print "$_ : $wc2{$_}\n";
    last if ++$c == 50;
}

aeilprst : 239
aeilnpst : 225
aeloprst : 220
...
adeilmry : 168
aeiprstv : 168
aeghorst : 167