PERL ssh腳本tty問題

Question

我想寫一個PERL腳本ssh到遠程機器並運行一些tcptraceroutes。我設法很好地處理了SSH部分。然而，tcptraceroute命令需要sudo，這裏是我遇到問題的地方。例如：

my (@traces, $stderr, $exit) = $sshCali->cmd(tty => 1, 
"sudo tcptraceroute $endpoint", interactive => 1, debug => 1); 

當我使用的tty => 1周系統的投訴，出現此錯誤： 「不是一個TTY」 當我不使用TTY => 1，則我得到這個： 「須藤：對不起，你必須有一個tty運行sudo「 任何幫助將不勝感激。這裏是我的代碼：

#!/usr/bin/perl 
use strict; 
use warnings; 
use Net::SSH::Perl; 

#vars 
my $endpoint = 172.31.100.1; 
my @traces; 
my $sshCali; 
my $hostCali = 'remotemachine'; 
my $cmd = 'sudo traceroute'; 

warn "Starting SSH Services:...\n"; 

$sshCali = Net::SSH::Perl->new($hostCali, interactive => 1, debug => 0) or die "Couldnt establish connection!"; 

$sshCali -> login("user"); # for non-interactive mode; 

print "here\n"; 

my (@traces, $stderr, $exit) = $sshCali->cmd("sudo tcptraceroute $endpoint", interactive => 1, debug => 1); 

#my (@traces, $stderr, $exit) = $sshCali->cmd(tty => 1,"$cmd $endpoint", interactive => 1, debug => 1); 

print STDERR "STDERR: $stderr\n" if $stderr; 
print "command exit w/ code: $exit\n"; 

$sshCali -> cmd("exit"); 


print "NOW ..... Printing the array: TRACES\n"; 
print @traces; 

在此先感謝。

Answer 1

完全可以在您的主目錄中安裝模塊並在您的腳本中調用它。請參閱Perlmonks上的此節點以獲得確切步驟：Installing Perl modules in home directory