code

I enjoy programming in Perl. Here are some programs/scripts I have written that are useful to me. I hope they might be useful to someone else also.

thumbnails.pl

Last updated:
Language: Perl
Description: Creates a photo album.
Requires: ImageMagick's convert and identify
Example Output: ../photos/20020927_paintball/

ogghtml.pl

Last updated:
Language: Perl
Description:
Requires: ogginfo, MP3::Info.
Example Output: ../music/_Disc 66.html

pmsblog.cgi

Last updated:
Language: Perl
Description:
Requires:
Example: ../cgi/pmsblog.cgi

webstats.cgi and webstats_log.cgi

Last updated:
Language: Perl
Description: See who is looking at your web pages, and where they came from.
Requires: SSI enabled web server
Example: ../cgi/webstats.cgi

Last updated:
Language: Perl
Description: Does nslookups and pings for a netblock. Takes a while on IPs without reverses; Win32 perl doesn't have the alarm function preventing me from setting a shorter timeout for reverse lookups.
Requires: Net::Netmask module from CPAN
Example: http://pms.derailed.org/cgi-bin/network.pl

map_images.cgi

Last updated:
Language: Perl
Description: Shows images of the maps of certain first person shooter games. You can select to only view map images that contain certain characters.
Requires: The map images which are included with server-monitor.zip.
Example: http://www.netdoor.com/cgi-bin/map_images.pl

highscores_osp.pl and highscores_lfire.pl

Last updated: mid 2000
Language: Perl
Description: Generates a web page displaying the highscores for a Quake2 server running either of the L-Fire or OSP Tourney DM mods.
Requires: The map images which are included with server-monitor.zip.
Example: http://quake2.netdoor.com:7227/cgi-bin/highscores_osp.pl

Language: Perl
Description: Snags a fresh copy of the Mozilla nightly builds. I awake each day to a fresh copy of mozilla. Mozilla should not be running when this is run. On Linux I suppose it would be easy to add a grep of ps aux and abort if mozilla is found, but that is not an option on win32.
Requires: wget and unzip

-->

files_list.cgi

Last updated:
Language: Perl
Description: Creates a list of files in a web page.
Requires: Server Side Includes enabled on the web server.
Example: http://www.netdoor.com/half-life/stats/

pr0n.pl by spinergy

Last updated:
Language: Perl
Description: Gets you ~9 MB of classy pr0n every day! This is the simple version that just downloads it. Spinergy's current version also downloads the thumbnails and creates an webpage for each day.
Requires: wget

Others to be added: XXmon.pl, stock_charts.cgi, and more.