Select Code to Download

#!/usr/bin/perl -w

...

open(BAD, "/no-such-path/not_here.sh |") || die "Died with: $!\n";
close(BAD);