避免密碼

Question

use Net::SSH::Any; 
use Data::Dumper; 

# my $ssh2 = Net::SSH::Any->new(..); 

my $cmd = "sudo -u postgres -p password perl -e 'print `whoami`'"; 
print Dumper $ssh2->capture({timeout => 15}, $cmd); 

我想sudo遠程主機上，但不要在代碼具有命令行上的明文口令像上面的想法一樣。有其他選擇嗎？

Answer 1

如果安裝在遠程機器上的sudo是不是很老，可以通過標準輸入傳遞密碼：

print $ssh2->capture({stdin_data => "$sudo_passwd\n"}, 
        'sudo', '-Sk', 
        '-p', '', 
        '--', 
        @cmd); 

Answer 2

我想我會推薦帶有命令限制和角色帳戶的SSH密鑰用於此任務。所以，角色的帳戶將有一個authorized_keys文件，將看起來有點像

command="postgres perl -e 'print `whoami`'" ssh-rsa <ssh key here> 

與

所以，你可以ssh到機器可用SSH密鑰，並僅執行上市命令。然後，您可以爲角色帳戶中的本地連接嘗試取消密碼，並使用SQL權限保持角色帳戶不受限制。