Thomas B�tzler <[EMAIL PROTECTED]> wrote: Hi,
joseph tacuyan asked:
> #usr/local/perl -w
> use strict;
> use Socket;
> open(OUTPUT,">>iplisted.txt") or die "can't open iplisted.txt
> $!"; foreach () { s/\s+//; my $address = $_; my $name
> = gethostbyaddr(inet_aton($address), AF_INET)
>
Hi,
joseph tacuyan <[EMAIL PROTECTED]> asked:
> #usr/local/perl -w
> use strict;
> use Socket;
> open(OUTPUT,">>iplisted.txt") or die "can't open iplisted.txt
> $!"; foreach () { s/\s+//; my $address = $_; my $name
> = gethostbyaddr(inet_aton($address), AF_INET)
> or die "Can't re
On 7/24/06, joseph tacuyan wrote:
How can rewrite it, so even it encounters such an error it would still
continue? Thank you for all the help.
Change this:
my $name = gethostbyaddr(inet_aton($address), AF_INET)
or die "Can't resolve $address: $!\n";
print OUTPUT "$_ =>$name \n";
to:
