« 网络通知： 国际光缆坏了 | Main | 华为生产的移动信息机的维护 »
December 27, 2006
[PERL] 通过hash关联数组去重
|
版权声明：可以任意转载，转载时请务必以超链接形式标明文章原始出处和作者信息及本声明。 https://windtear.net/archives/2006/12/27/001176.html http://windtear.net/archives/2006/12/27/001176.html [PERL] 通过hash关联数组去重 my %repeated; 然后在循环里面处理 if ($repeated{item}) { print "repeated\n"; next; } $repeated{item}=1; 显而易见 做记数也是很方便 本blog前面提到的自动封禁等都是如此原理 2004-03-25 16:26 我爱网络 代理自动封禁 squid autodeny.pl 2004-03-25 16:07 我爱网络 www 的自动封禁 80autodeny.pl |
Posted by windtear at December 27, 2006 11:59 PM
