Hi all,
The script in the following can do the batch conversion from domain name to IP:
------------------
#!/usr/bin/perl
use warnings;
use strict;
use Socket;
while ( <> ) {
chomp;
my ( $address, $port ) = split /:/ or next;
my $number = inet_aton $address;
my $ip = inet_ntoa $number;
print "$address:$port -> $ip:$port\n";
}
__END__
------------------
If I want to do the opposite thing, i.e., conversion from IP to domain
name, what should I revise this script to do the trick.
Regards,
--
Hongyi Zhao <[email protected]>
Xinjiang Technical Institute of Physics and Chemistry
Chinese Academy of Sciences
GnuPG DSA: 0xD108493
2009-1-31
_______________________________________________
Tutor maillist - [email protected]
http://mail.python.org/mailman/listinfo/tutor
