Perl で Net::SSH を介して特定のサーバーにログインすると (管理者アクセス権なし)、次のエラーが発生します。
%SECURITY-SSHD-4-WARNING_LOGIN : The requested term-type '' is not supported
(また、端末の種類を永久に変更したくありません。)
私のコードの一部は次のとおりです。
my $ssh = Net::SSH::Expect->new (
host => "X.X.X.X",
user => 'bnegrao',
raw_pty => 1
);
eval
{
$ssh->login();
};
PerlでNet::SSH経由でログインするときに端末の種類を変更できますか?
答え1
Perlコードはsshを実行して環境からTERMをエクスポートするため、ログインする前にPerl環境を変更できます。
$ENV{TERM} = "vt100";
$ssh->login();
必要に応じて最初に保存し、ログイン呼び出し直後に復元できます。