Help for this page
@output = `command`;
open(PIPE, "command |") or die $!; while (<PIPE>) { print; # ..do something else }