我正在使用脚本自动登录到服务器:
#!/usr/bin/perl
use Net::SSH::Perl;
my $host = "hostname";
my $usr = "my userid";
my $pwd = "my password";
my $ssh = Net::SSH::Perl->new($host);
$ssh->login($usr,$pwd);
my($stdout, $stderr, $exit) = $ssh->cmd("ls -l /home/$usr");
我想保存每次登录时的终端活动日志,但我想将其保存到我的计算机而不是服务器中。
我怎样才能做到这一点?
答案1
如果您想从 perl 执行此操作,其他人将不得不回答,但如果您想从终端会话执行此操作,我会这样做。在终端中,我按下 Shift+Ctrl+A,这将选择该终端会话缓冲区中的所有文本。然后我将其粘贴到 geany 中并保存。如果您没有获得整个会话,您可能需要在“首选项”中增加回滚行数。