Select Code to Download

Use of uninitialized value in delete at
Attempt to free unreferenced scalar

%hsh = qw(a 1 b 2 c 3 d 4);

...
}
$num = %hsh;
print "$num\n";