Back to my home page.

gbacon's Perl stuff

I'm a member of Huntsville.pm, the Huntsville Perl user's group.

Regular expression puzzle: write a Perl regular expression that matches binary strings with an even number of zeros and an odd number of ones. But you can only use literals, grouping, alternation, concatenation, and Kleene star. Read more...

Reduction from CLIQUE to Perl regular expression matching, i.e., Perl regular expression matching is NP-complete. Mark-Jason Dominus has assembled a list of reductions from NP-complete problems to Perl regular expression matching.

The following articles are reprinted courtesy of The Perl Journal:

• Tktk: A Perl/Tk Solitaire Game
• Perl Heresies: Building Objects Out Of Arrays
  • yapc99 presentation on the same subject

Code:

• File-BSDGlob-0.94.tar.gz (readme) (PGP signature)

  Work derived from this code is now part of the core distribution! Its new name is File::Glob and it's the default glob() operator in Perl.

• News-Scan -- a newsgroup statistics library

  News-Scan-0.53.tar.gz
  News-Scan-0.52.tar.gz
  News-Scan-0.51.tar.gz

• avg-addy

  compute an "average" of a list of email addresses

• closed-warning.patch

  patch to perl 5.5.63 that adds warnings for various operations on closed handles, slated for inclusion in 5.6

• configdb.tar.gz

  source code for perl configuration database

• encrypt

  encrypt your Perl programs!

• fano

  Perl/Tk program to draw the Fano Plane (output)

• Hypermail search (see also Bob Crispen's writeup)

  quick search using swish-e.

• iter-destroy.patch

  patch against perl 5.004_04 to make DESTROY method calls propogate up the ISA graph (i.e. call destroy methods iteratively)

  This patch didn't make it into the core distribution.

• junk

  send junk mail to a spam sink (uses MH)

• lwall-quotes.txt.gz

  my list of constantly updated cool Larry Wall-isms (mirrored on the CPAN at http://www.perl.com/CPAN/misc/lwall-quotes.txt.gz)

• perlplan

  Ever wished you had a dynamic .plan? Give this a whirl!

• pserv

  my talker written in Perl

• sort algorithm demos (in Perl/Tk)

  sorting-0.01.tar.gz
  sorting-0.02.tar.gz (Adds RadixSort!)

• sorts-patch.56

  patch against perl 5.004_56 to use faster C versions of common sort subs when appropriate. Common sort subs are

  • $a <=> $b
  • $b <=> $a
  • $a cmp $b
  • $b cmp $a

  This patch didn't make it into the core, although Hans Mulder reworked it against version 5.5.63. It is slated to be included in 5.6. The big family of sort subs left to pre-can is those of the form { $a->[0] cmp $b->[0] } that are typically used in Schwartzian Transforms.

• time-prof

  generate a histogram in GIF format depicting the hours of the day in which most people post to a newsgroup--also demonstrates one way to use Perl's gmtime() operator (like the localtime() operator, only different) without causing yourself Y2k grief.

• Tk Timekiller (Win32 version - 2.1 MB)

  a fun little solitaire game (not the same game as Windoze solitaire) implemented in Perl/Tk. View the game source. Look at screenshots of a starting position or a losing position. The Win32 executable contains card images distributed under the GPL. To retrieve their source, transfer the full archive.

Back to my home page.