Select Code to Download

sub increment {
    $_++ foreach @_;
...
increment(%hash);

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

a => 2
b => 3
c => 4

increment(qw(a 1 b 2 c 3));
...
Modification of a read-only value attempted at...