perl -e 'open(FILENAME,"ipaddress_list.txt";);@date=<FILENAME>;%seen=();@unique=grep {!$seen{ $_ }++}@date;foreach(@unique){print `whois $_`;}close(FILENAME);
Jan 28 2010, 15:29
DB Queries: 8 (0.005s) | CACHE Queries: 15 (0.0018s) | Script Execution Time: 0.010 | Memory usage: 0.83MB | Server Load Average: 0.39, 0.3, 0.23