レス数が950を超えています。1000を超えると表示できなくなるよ。

初心者もＯＫ！ FreeBSD質問スレッド その９

527 ：名無しさん@お腹いっぱぃ。 ：01/12/07 00:34

>>504
別のホストにTelnetログインしてコマンド実行してログアウトする
って感じで良いのか？こんなのか？

#!/usr/bin/perl

use Net::Telnet;

$address = '192.168.0.4';
$user = 'admiso';
$passwd = 'Password';
$command = '/bin/sh ~/hogehoge.sh';

$host = new Net::Telnet(host => $address,
Timeout => 15,
Prompt =>'/[\w\-]+% $/') or die "Can't connect: $!\n";

$host->login($user, %passwd);
print %host->cmd($command);
$host->close;

一応、/usr/ports/net/p5-Net-Telnet　のinstall必須な。
変なPromptにしてると誤動作するかもな。
あと、話題の続き、スレ違いorその他苦情等は「シェルスクリプト〜」スレで頼む。

read.cgi ver5.26+ (01/10/21-)