Select Code to Download

if ($line =~ /^\s*:([a-zA-Z]+)\s*$/)   # new list of letters
  {     
...
        print "master_letter_freq:\n";
        print Dumper \%master_letter_freq;  #####################
  }

use strict;
use warnings;
...
list of letters or pattern: q

C:\Users\xxxx\Documents\Dictionary\en-US\en-US>