Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
use strict;
...
my ($key4, $value4) = each %$value2;

print "\$key4 = '$key4', \$value4 = '$value4'\n";

Select or download this
```
$key4 = 'key4', $value4 = 'World'
```