Re^4: alphabet counting

Hmm...

my %h = ( a => 1, b => 2, c => 3 );
print "$k => $h{$k}\n" for my $k (sort keys %h);
[download]

Output:

syntax error at D:\progs\perl\junk.pl line 5, near "$k ("
Execution of D:\progs\perl\junk.pl aborted due to compilation errors.
[download]

Maybe you meant something like:

print "$_ => $h{$_}\n" for sort keys %h;

Or the (no doubt) more newbie-friendly:

for my $k ( sort keys %h ) {
  print "$k => $h{$k}\n";
};
[download]