Select Code to Download

$ cat spw1081756tool.pl
#!/usr/bin/perl
...

say qq{$0 \@ARGV ->@ARGV<-};
$

use strict;
use warnings;
...
       };
    return &$rcDoIt;
}

./spw1081756tool.pl @ARGV ->host1 host2 host3 host4 host5<-
./spw1081756tool.pl @ARGV ->host6 host7 host8 host9 host10<-
./spw1081756tool.pl @ARGV ->host11 host12<-