perlpoetry
by Ronald J Kimball

summer.pl

summer.pl won first place in the Haiku Contest at The Perl Conference 4.0. (Apparently, the judges have an even greater appreciation for puns than I expected.)

#!perl -ln

sub summer { my $sum;
$sum += $_ for @_;
$sum } print summer (split);

# sub summer my sum
# sum plus equals ARG for ARGs
# sum print summer split

# for a true haiku,
# you see, mentions a season
# much unlike this one

__END__

As you might expect, this Perl haiku sums its input. Enter a line of whitespace separated numbers, and summer.pl will print the sum.

sonnet.pl

sonnet.pl v0.1 was featured in the results of The Perl Journal's First Annual Perl Poetry Contest (TPJ #16/#17). The link below is to the most recent version.

sonnet.pl - the main program
sonnet.html - the documentation for sonnet.pl
example - sample output
word_pron.dat - the default data file used by sonnet.pl (gzipped)
shwords.dat - an alternate data file, containing the words of Shakespeare's sonnets, with rhymable and frequency columns

sonnet.pl support files

convert_moby_pron.pl - the program that generates word_pron.dat from mobypron
mobypron - Moby Pronunciator, the starting point for generating word_pron.dat (gzipped)
[with corrections by rjk versus the original Moby project file]
mjoin - the shell script to remove odd words
words_all - ENABLE wordlist, the data file used by mjoin (gzipped)
words_ex/ - the first page from each of the three data files
block.pl - the program that finds unrhymable words
[caveat - mywords.dat does not contain inflected forms, which some "unrhymable" words would rhyme with]

resources

notes

sonnet.pl includes documentation in Pod format, from which the HTML documentation has been generated.

The executable scripts are linked as .txt files, because otherwise this web server will try to treat them as CGI scripts. If you download them, feel free to rename them with the appropriate extension.