Help for this page

Select Code to Download

Select or download this

my $pid;
eval 
...
{
    die "$@:$!\n";
}

Select or download this

my $pid = open2(\*OUT, \*IN, 'diskpart');