Help for this page

Select Code to Download

Select or download this
```
open INPUT, '<', 'theFileName';
```

Select or download this

print "$_ found in lines: @{$counter{$_}}\n" for sort keys %counter;