Select Code to Download

#!/usr/bin/perl
use warnings;
...
   sleep 3;
   print "Step $step\n";
}

#!/usr/bin/perl
use warnings;
...
   print $_;
}
close PIPE1;