my $cmd1 = "cat /etc/passwd"; my $sshcmd = "/usr/bin/ssh -t -i \$HOME/.ssh/mypubkey -o 'StrictHostKeyChecking no' user\@host $cmd1"; open(IFILE, "$sshcmd |") || die "Bad open";