Select Code to Download

$ perl othercode.pl | perl thiscode.pl

$ perl thiscode.pl SOMEFILE.txt

#!/usr/bin/perl -w
use strict;
...
foreach (@lines) {
  #Do my stuff here
}