Select Code to Download

system("/some/program >/dev/null");

my $output = `/some/program`;

open(my $handle, "/some/program|") or die;
while (<$handle>) {
  # do stuff with a line
}