Acme::Scurvy::Whoreson::BilgeRat::Backend::insultserver - generate insults in the style of the old colarado.edu Insult Server
use Acme::Scurvy::Whoreson::BilgeRat; my $insultgenerator = Acme::Scurvy::Whoreson::BilgeRat->new( language => 'insultserver' ); print $insultgenerator; # prints an insult
We used to have the Insult Server at http://insulthost.colorado.edu which you could telnet to on port 1695 to get a random insult. And Lo! it was fun.
Useless, but fun.
Sadly, it's down now. This is a reimplementation in Perl.
Should be able to specify another config file, possibly though environment variables.
Simon Wistow <firstname.lastname@example.org>
based on code by
James Garnett <email@example.com>
Copyright 2005, Simon Wistow
Distributed under the same terms as Perl itself.