perl -MSocket -lne 'print "$_: ", eval { inet_ntoa inet_aton $_ }' sites.txt
perl -MSocket -lne 'print "$_: ", scalar gethostbyaddr( inet_aton( $_ ), AF_INET )' ips.txt
No comments:
Post a Comment