Следващ пост Профил на Bozhidar Предишен пост

Bozhidar

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