Help language development. Donate to The Perl Foundation
Construct an insulting epithet in the manner of an old IRC bot
use Acme::Insult::Lala; my $lala = Acme::Insult::Lala.new; say $lala.generate-insult;
This makes an insulting epithet in the manner of 'lala' an IRC bot that used to be on the #london.pm channel back in the mists of time.
I think I originally got the source data from an analysis of epithets in Shakespeare plays or something, but I can't actually remember it was that long ago. Anyhow at some point the lovely Simon Wistow retrieved the basic code and data and incorporated it in the Perl 5 module Acme::Scurvy::Whoreson::BilgeRat::Backend::insultserver. From whence I retrieved the data and made it into a Perl 6 module.
I suppose you could use it for generating test data or something but there's nothing more to it than you see in the Synopsis.
Assuming you have a working Rakudo Perl 6 installation you should be able to do :
zef install Acme::Insult::Lala
If you don't like the language, don't use it. If you don't think it's insulting enough, write your own.
In the unlikely event you should find a bug please report it at https://github.com/jonathanstowe/Acme-Insult-Lala/issues
I guess the data in resources/lala.txt should properly be considered to be in the public domain as it's likely that it came from some such source in the first place. All the rest of the code is free software and licensed under the terms described in the LICENCE file.
© Jonathan Stowe 2016, 2017, 2018, 2019