Net:Telnet errmode coderef

[dod123]

Hello all;

I am using the Net:telnet module. I want to write a ermode diffrent than DIE.
I'm aware of the errmode & coderef posibilities in the module but I have no idea how two use them.

Thanks a lot for any assitance.

 

[dod123]

Any help?

 

[dmazzini]

Here we go:

Making connection to yahoo..It works..Now if you change to an unexisting web page it fails and goes to the error routine.

#!/usr/bin/perl
use Net::Telnet;
$connection=Net::Telnet->new(Timeout => 5, Host => "

http://www.yahoo.com",

Port=>80, errmode =>sub {&error});

sub error {
print "Connection Failed!\n";
}

__________________________________________________________
Other:

#!/usr/bin/perl
use Net::Telnet;
$connection=Net::Telnet->new(Timeout => 5, Host => "

http://www.yahoo.com2",

Port=>80);

# This error handler prints the errmsg and continues.
$connection->errmode( sub { print @_, "\n" } );

----------------------------------------------------------

Other

telnet = new Net::Telnet;
$telnet->errmode( sub { print "ERROR:" . join('|', @_) . "\n"; } );




dmazzini
GSM System and Telecomm Consultant

 

[dod123]

Thanks a lot,

Its exactlly what I looked for.

 

[dmazzini]

Your welcome!


dmazzini
GSM System and Telecomm Consultant