> Curtis Larsen wrote:
>
> Does anyone know of a way to perform *batch* HP3000 client telnet access
> to something?
The following Perl code works in a batch job:
#!/PERL/PUB/perl
$username = 'youruser';
$passwd = 'yourpass';
use Net::Telnet ();
$t = new Net::Telnet (Timeout => 10,
Prompt => '/\]\$ $/');
$t->open("yourhost");
$t->login($username, $passwd);
@lines = $t->cmd("/usr/bin/who");
print @lines;
For more info about Net::Telnet (which I have bundled into Perl/iX 5.6.0),
please see:
http://search.cpan.org/doc/JROGERS/Net-Telnet-3.02/lib/Net/Telnet.pm
- Mark B. (with Perl almost all things are possible)