Select Code to Download

my $pid = open KID,  '-|', 
    'pmemd -i mdin -c inpcrd -p prmtop -r restrt -o con -x mdcrd' 
...
    kill 'INT', $pid if m[some data];
    print OUT;
}

my $pid = open KID,  '-|', 
    qq[pmemd -i mdin -c inpcrd -p prmtop -r restrt -o /dev/tty -x mdcr
+d] 
...
    kill 'INT', $pid if m[some data];
    print OUT;
}