in reply to Timout a gethostbyaddr?

You probably want Time::Out:
use Time::Out; my $retval = timeout 2 => affects { # some statement }; print $retval;

Replies are listed 'Best First'.
Re^2: Timout a gethostbyaddr?
by rementis (Beadle) on Mar 23, 2007 at 01:18 UTC
    Thanks for this one, I probably should have searched CPAN before bothering everyone. :)

    The docs for Time::Out suggest that blocking IO under windows does not work however, so I will have to test and see.

      Run for your life, Time::Out uses alarm