Select Code to Download

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

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

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