Select Code to Download

$ cat spw759180_NetWallah 
#!/usr/bin/perl
...
2
4,9
11,$

use strict;
use warnings;
...
   0 .. $#inRange;

printf qq{%3d%3d\n}, $starts[ $_ ], $ends[ $_ ] for 0 .. $#starts;

  2  5
  9 11
 13 14
 16 16