in reply to Script outputs on screen
open( my $fh, '-|', "script2 a b c" ) or die; while (<$fh>) { print; } [download]