Select Code to Download

#!/usr/bin/perl
my $h="testapp01";
...
# Use this to actually do the remote execution:
open $remote, "| ssh -q $uid\@$h";
print { $remote } join "\n", @commands;

 Pseudo-terminal will not be allocated because stdin is not a terminal
+.
mv: cannot stat `\\/home\\/wasbatsrv\\/tmp\\/testbak\\\n': No such fil
+e or directory
...
mv: cannot stat `\\/home\\/wasbatsrv\\/tmp\\/testbak\\/testbakr\\/four
+\\.properties\\\n': No such file or directory
mv: cannot stat `\\/home\\/wasbatsrv\\/tmp\\/testbak\\/two\\.propertie
+s\\\n': No such file or directory
mv: cannot stat `\\/home\\/wasbatsrv\\/tmp\\/testbak\\/one\\.propertie
+s\\\n': No such file or directory

[wasbatsrv@testapp01 testbak]$ ls
one.properties  testbakr  two.properties