neil@ettin ~/src/perltest $ ./foo.pl 
$VAR1 = {
          'G' => '28',
          'C' => '25',
          'A' => '26',
          'U' => '0'
        };