Help for this page

Select Code to Download


  1. or download this
    my $path = $ARGV[0];
    open my $fh, "-|", "$path 2>&1" or die "can't open $path: $!"; 
    
    print ": $_" for <$fh>; # print line by line
    close $fh;
    
  2. or download this
    my $x= `$path 2>&1`;
    print "<<< $x >>>";    # print whole slurp