我可以通過 ssh 將局部變量回顯到遠程文件中嗎？

Question

我嘗試在文件末尾寫入變量，但將其寫入本地服務器的 STDOUT 一些代碼：

$num = <STDIN>
my $cmd = "echo $dep_keys{$num} >> /root/1";
#$ssh->system({stdin_data =>$dep_keys{$num} },"echo >> /root/1");
#$ssh->error die "Couldn't establish SSH connection: ". $ssh->error;
#$ssh->system("echo $dep_keys{$num} >> /root/1");
$ssh->system($cmd);

我希望該文件將在文件末尾包含新行。

Answer 1

use String::ShellQuote qw( shell_quote );

defined( my $num = <STDIN> )
   or die("Invalid input");

chomp($num);

defined($dep_keys{$num})
   or die("Invalid input");

my $cmd = shell_quote('printf', '%s\n', $dep_keys{$num}) . ' >>/root/1';
$ssh->system($cmd);

修復：

• 檢查 EOF 和其他無效輸入。
• 從$num中刪除尾隨換行符（如果有）。
• 將文本從 hash 元素正確轉換為 shell 文字。
• 避免echo顯，因為echo顯使 output 某些字符串成為不可能。