Help for this page

Select Code to Download

Select or download this

while (<>)
{
   $lines{$ARGV}++;
   ...
}

Select or download this
```
while (<ARGV>)
{
...
   }
   print;
}
```