Select Code to Download

open(OUTPUT, "$script |") or die "Cannot run '$script': $!";
my @output;
while (<OUTPUT>) {
  push @output, $_ if /EXPRESSION/;
}