摘要:
Perl的第二纪 多少年了,人们一直在说,Perl已经死了或者说正在死。 我甚至也这么说过,虽然我的意思和字面上的并不一样。 今天我自作主张在此宣布,我们已经在Perl的第二纪了,不过这和Perl 6没有关系! 这并不是说我不喜欢Perl 6/Rakudo,实际上我很喜欢,只是现在我还并不依赖它工作 阅读全文
摘要:
摘自:http://www.cnblogs.com/zhangchaoyang 作者:Orisun#!/usr/bin/perluse Bloom::Filter;my $bf=Bloom::Filter->new(capacity => 10,error_rate => .001);my @keys=qw/a s d f g h j k l z/;$bf->add(@keys);while(<>){ chomp; print "Found $_\n" if $bf->check($_);}$bf=Bloom::Filter-> 阅读全文