Perl腳本調用內部的bash腳本，用系統命令」

Question

我有一個基本的shell腳本這樣;

#!/usr/bin/bash 
echo "Openning ssh connection to remote host "$2" for "$1" user and finding the archive directory "$3"" 
ssh "$1"@"$2" find "$3" 

我必須在腳本Archive.pl命名我們連接遠程服務器的Telnet另一perl腳本連接。我想打電話給我的這個Perl腳本內腳本中使用Perl腳本的其他模塊。我想的是命令，但它不工作。

system("Connector.sh",$arg1,$arg2,$arg3); 

任何想法做呢？

Answer 1

您可以跳過shell腳本，並將其放入Perl腳本中。

print qq(Opening ssh connection to remote host "$arg2" for "$arg1" user and finding the archive directory "$arg3"); 
system("ssh", "$arg1\@$arg2", "find", $arg3)