Net::SSH::Perlを使って、以下のようにリモートマシン上のコマンドを実行しています。
my $ssh = Net::SSH::Perl->new("host");
$ssh->login("user", "pass");
($out, $err, $exit) = $ssh->cmd("command");
"command"に失敗した場合は、$errにエラー内容が格納されますが、hostやuser、passが間違っていた場合は、Permission deniedとなって、プログラムが終了してしまいます。
hostやuser、passの間違いで$ssh->cmdを失敗した場合にエラーを取得する方法があれば教えてください。
No.1
- 回答日時:
試していませんが、evalに閉じ込めて実行することはできませんか?
この回答への補足
こういうことでしょうか?
eval( my($out, $err, $exit) = $ssh->cmd("df") );
print "error: $@\n" if ($@);
試して見ましたが、errorを表示せずに"Permission denied"となってしまいました。
No.2ベストアンサー
- 回答日時:
#1 です。
> eval( my($out, $err, $exit) = $ssh->cmd("df") );
> print "error: $@\n" if ($@);
ん? eval って
eval {
my($out, $err, $exit) = $ssh->cmd("df")
};
print "error: $@\n" if ($@);
って、使い方をした方が。
「実用Perlプログラミング」の5章 eval によると、こんな使い方になっています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) AWSのcloud9で「 ls -l ~/.ssh/」のコマンドで公開鍵、 秘密鍵を知ろうとすると「 1 2023/07/09 02:10
- UNIX・Linux Ubuntu20.04からUbuntu22.04にバージョンアップする際にssh-rsaが無効になっ 1 2022/11/25 00:08
- UNIX・Linux リナックスのリモート接続の際に使う sshコマンドについて 1 2022/11/21 19:46
- オープンソース AWSドメイン名でApacheテスト・ページを表示させる方法を教えて下さい。 1 2023/04/26 15:59
- その他(開発・運用・管理) WindowsからSSHでサーバーにあるファイルをダウンロードできない…。 3 2022/04/24 11:08
- UNIX・Linux linuxサーバーのキャッシュをクリアするコマンドを実行したい。 5 2023/01/24 14:52
- UNIX・Linux ubuntuに外部侵入できるか 2 2022/04/09 12:48
- PHP php ログイン 1 2022/11/01 00:24
- セキュリティホール・脆弱性 ssh(ポートの22番)ハッキングを受けています。 1 2022/08/16 21:18
- UNIX・Linux Linux(fedora)でホスト名について 2 2022/06/21 14:24
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
CLispのloop内の挙動について
-
Win98+PWS4.0でPERLが動作しま...
-
ハノイの塔の問題で困っており...
-
[perl] next と return 同じ意...
-
HASH(0xほげほげ)
-
Perlで複数の値を返す良い方法...
-
dieやPerl自体でエラーが発生し...
-
Application.ScreenUpdating = ...
-
JSONで文字列が長い時
-
formで特定のinputを送信しない...
-
実行時エラー 3020の対策
-
16進の10進変換について
-
Pythonでターミナルに文字を出...
-
文字のカラーとフォントの指定...
-
パイソンのクラスについて
-
c言語 16進数の2進数への変換
-
パイソンのクラスのブログラム
-
<SELECT>タグの折り返し
-
セレクトメニューで2つの項目...
-
Djangoについて!このドットの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Perlで複数の値を返す良い方法...
-
HASH(0xほげほげ)
-
プロトタイプ宣言のワーニング...
-
Pythonのプログラミングの質問...
-
Net::SSH::Perlについて
-
perlのスクリプトどこが間違っ...
-
print <<"_HTML_"の中でサブル...
-
内部処理形式が日付型 (Date) ...
-
Perlで use strict して our変数
-
変数に値を代入するのに、まずu...
-
Perlで足し算をするには
-
連想配列とforeach
-
Perl:計算誤差について
-
icmp socket error
-
Perlで自分自身の関数名を知る...
-
PERLの「!=」と「=~」 or...
-
[perl] next と return 同じ意...
-
for文の中でのforeachの問題
-
PerlでCabochaを呼び出すには(...
-
Net::Telnetでタイムアウト時間...
おすすめ情報