Help for this page

Select Code to Download

Select or download this
```
print join( "|", keys %found), "\n";
```

Select or download this

for my $key (keys %found) (
  print "$key: $found{$key}\n";
}