Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

$| = 1;
...
        print STDERR "(" . scalar ( @lines ) . ")\n" if ( !( $startat 
+% 100) );

}

Select or download this
```
100
(2506)
200
...
(2806)
500
(2906)
```