间歇性第一次迭代失败,但第二次迭代通过
问题描述:
第一次迭代中相同的命令失败,但传入第二次迭代。有时它会通过两次迭代。 $ssh
是Net::SSH::Expect
的对象。 这种奇怪的行为的任何想法?间歇性第一次迭代失败,但第二次迭代通过
$ssh = Net::SSH::Expect->new(
host => "$host",
password => "$pass",
user => "$id",
raw_pty => 1,
timeout => 50
);
代码段:
&Test("Create exports on Sonas------ No Kerberos");
$no_of_exports=2;
my $fs = "/ibm/gpfs0/";
while($no_of_exports)
{
my $share_name = &get_share_name();
my $path="$fs" . "$share_name";
$cmd="ssh mgmt001st001 mkexport $share_name $path --nfs 'client002\\\\(rw,no_root_squash\\)'";
print "CMD: $cmd";
$out=$ssh->exec("$cmd");
print $out;
--$no_of_exports;
}
输出:
Test 02 : Create exports on *Sonas*------ No Kerberos
CMD: ssh mgmt001st001 mkexport kas41535108 /ibm/gpfs0/kas41535108 --nfs 'client002\\ (rw,no_root_squash\)'
--nfs 'client002\\(xport kas41535108 /ibm/gpfs0/kas41535108
> rw,no_root_squash\)'
bash: -c: line 0: syntax error near unexpected token `('
bash: -c: line 0: `mkexport kas41535108 /ibm/gpfs0/kas41535108 --nfs client002\\('
[[email protected] ~]#
[[email protected] ~]#
CMD: ssh mgmt001st001 mkexport kas219760489 /ibm/gpfs0/kas219760489 --nfs 'client002\\ (rw,no_root_squash\)'
89 --nfs 'client002\xport kas219760489 /ibm/gpfs0/kas2197604
> \(rw,no_root_squash\)'
EFSSG0019I The export kas219760489 has been successfully created.
EFSSG1000I The command completed successfully.
答
该错误消息是在那里。 Bash窒息,因为(
令牌是意外的。您需要添加两个反斜杠,你对他们有四个,
$cmd="ssh mgmt001st001 mkexport $share_name $path --nfs 'client002\\\\(rw,no_root_squash\\)'";
成为
$cmd="ssh mgmt001st001 mkexport $share_name $path --nfs 'client002\\\\\\(rw,no_root_squash\\)'";
你实例化你的Net :: SSH ::期待'raw_pty'模式对象? – DavidO 2012-07-24 07:19:56
是的,现在在我的问题中也添加了这个部分。 – Joe 2012-07-24 07:21:51
为什么在括号之前有'\\\\'?除非我错过了一些东西,否则应该是'\\'(没有空格)。 – 2012-07-24 07:27:15