HN Hall of Fame Weekly email

Black Perl

en.wikipedia.org Reference Encyclopedia entries Design & creativity Class of 2021-07 Hall of Fame
Screenshot of en.wikipedia.org captured 2026-07-20
Page preview · captured 2026-07-20

The originally submitted URL now redirects to the address above. Updating the destination does not change the item’s HN history, Hall membership, or rank.

Resurfaced independently across 4 calendar years, with breakout response in 2 of them.

submissions
6
submitters
6
observed span
2010–2021
peak thread · 67 comments
330 pts
latest 20+ return · 2013-09-12
330 pts

Submission timeline

2007–2026

One slot for every year since HN launched. Height is that year's peak points; orange marks a 100+ point or 50+ comment breakout. Select a bar to open its strongest thread.

First comments on top threads

HN comment order

I wrote a (valid) Python poem a long time ago: import calendar as usual StandardError is usual \ or not usual. month is long try: not coerce finally: quit (help for me in range (usual. MONDAY))

roberto·330-point thread·

Here's my favorite piece of perl: #!/usr/bin/perl -s @x=qw/e n d/;if( $kg){$e=13;$_="setrand(@{[int((rand)*90)]}) ;K=vector(2,g,nextprime(random(10^$s)));e=$e;n=K[1]* K[2];d=e^-1%((K[1]-1)*(K[2]-1));";s/\s//sg;for( `echo "$_ e\nn\nd\n"|gp -q`){print$x[$j++] ,"=",`echo "10i16o$_ p"|dc`}exit}$t= unpack'H*',join'',<>;$l=length$n;$y =$e?$l-2:$l;$i="16dio";while (){$M= ($e&&1+int(rand 8)).(substr $t,$p ,$y or last);$i.="\U$M $k $n\E| pc";$p+=$y}for(reverse `echo "$i"|dc`){chop ;$d&&s/^(.)//||($_= sprintf"%0${l}s" ,$_)…

aditya·124-point thread·

The first top-level comment from each of the four biggest threads, in HN’s own order. Excerpts are shortened; open a comment for full context.

Breakout years
2

100+ points or 50+ comments

Total points
477

reference only — not used in Hall rules or ranking

Total comments
107

reference only — not used in Hall rules or ranking

Every submission

DateTitle as submittedByPointsComments
2010-01-30Black PerlFirst breakoutsoundsop12440
2013-09-12Black PerlBest thread · Latest 20+ point returndiego33067
2019-03-12Black Perlrbanffy100
2021-03-03Black PerlOzzie_osman80
2021-07-14Black Perl (Code Poetry)Hall inductiontwobitshifter30
2021-08-26Black Perldempedempe20