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

##</code><code>##

my $output = `/some/program`;

##</code><code>##

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