I used the node lister (cause I can), with

my $data = join '', <DATA>;
print "<li>[id://$_]"
for $data =~ m{\Q<td style = "text-align: right">\E\s+(\d+)\s+\Q</td>\
+E}g;
__DATA__
# raw shizzle from "node lister" here
[download]

You can just use super search.

There is still http://tinymicros.com/ptav/ and http://perlmonks.thepen.com, so if you feel like crawling, that's where i'd start. In fact, I'd look to improve ptav (ask jcwren about it).

That's as much as I can divulge. Hmm, it's been about two years since I mirrored perlmonks.thepen.com, hmmm :)