I could talk about aesthetics; I could talk about line noise andreadability; but for me it ultimately comes down to one thing: datastructures.
Namely, I find it very hard to write perl code of any depth withoutrunning headlong into the fact that Perl's 'collection' types (arraysand hashes) can't contain themselves. All they can contain is scalars(strings, numbers, and references).
For example, recently I was writing a program to mass-query the SBLDNS blocklist
技巧
新出來的
Python has recently (at least for some values of recently) grown 'list comprehensions' ,which let you easily iterate over a list to transform or selectentries (or both). List comprehensions can be thought of as syntacticsugar for map and filter operations, but they're actually morepowerful.
One reason is that you can write a multilevel list comprehension,which effectively iterates over multiple levels of lists. Take thecase where you have a list within a list and want to return all of thelow-
This is roughly speaking a table showing the top N SBL listings thatare spamming us over the past 28 and change days. I generated it bygrabbing all rejected IP addresses, looking them up in the SBL, andcounting how many hits each SBL listing accumulated.
| Refused connections | SBL listing |
| 232 | SBL26860 |
| 208 | SBL23039 (Rokso: Randy Forman) |
| 190 | SBL21425 (listed since 28 Nov 2004) |
在一連串的英雄片相繼推出後，跑出來的有 Spiderman、X-men、Batman 等等，這些片的成功點，在於除了講英雄的表面風光，還會探討英雄身份，為主角們帶來什麼樣的改變，和他們的心理變化等等，這使電影真真正正創造一個立體的角式
The spam storm seems to have died down nowand it's a Saturday night, so time for a wrapup and a look at theoverall stats this week.
This week's total is 295,000 SMTP connections from at least 38,000different IP addresses. In hindsight, the spam storm was probablyalready dying on the 26th, since we got only about another 60,000 SMTPconnections since then (which is more or less average)
本站在寫文章時是用 Textile 的，在寫文時可以相當方便地可以寫連結，而不用打 HTML 碼。不過，在開始試行網摘時，要將大量的連結寫成 Textile 的格式就很痛苦了。我通常都會將我在 del.icio.us 和 365Key 收到的網址，用 RSS 聚合 ( FeedJumbler )，將
前兩天上班，見到 《AM730》 的牌子，不過沒有人派，心想原來 《AM730》 已經創報了？今天早上班見到有人在派了，拿了一份來看，不過看到最後的「讀者回應」欄，才發現原來手上的這一份就是第一份的 《AM730》 了
As a companion to PythonDNSQueries , here is the sameprogram to query the SBL in perl, using the CPAN Net::DNS package.
#!/usr/bin/perl -wuse strict;use Net::DNS;my $sstr = ".sbl.spamhaus.org";my $res = Net::DNS::Resolver->new;foreach my $ip (@ARGV) { $ip = join('.', reverse(split(/\./