view release on metacpan or  search on metacpan

lib/Acme/Insult/Glax.pm  view on Meta::CPAN

=back

Be aware that some of these are unsupported when the language is set to C<en_corporate>.

=item C<who>

Person to insult. If present, changes the template to third person singular.

=item C<plural>

If present (along with a C<who> value), changes the template to third person plural.

=back

=head2 C<adjective( [...] )>

    my $adjective0 = adjective( );
    my $adjective1 = adjective( 'en' );
    my $adjective2 = adjective( 'en_corporate' );

Generates a single descriptive adjective in plain text.

Expected parameters include:

=over

=item C<lang>

Language style. Expected values include:

=over

=item C<en>

Plain English. This is the default.

=item C<en_corporate>

English with corporate jargon inserted.

=back

=back

=head1 LICENSE & LEGAL

Copyright (C) Sanko Robinson.

This library is free software; you can redistribute it and/or modify it under the terms found in the Artistic License
2. Other copyrights, terms, and conditions may apply to data transmitted through this module.

Insults are generated by L<libInsult|https://gitlab.com/mattia.basaglia/LibInsult> which is maintained by L<Mattia
"Glax" Basaglia|https://mattbas.org/>.

=head1 AUTHOR

Sanko Robinson E<lt>sanko@cpan.orgE<gt>

=head2 ...but why?

I'm inflicting this upon the world because L<oodler577|https://github.com/oodler577/> invited me to help expand Perl's
coverage of smaller open APIs. Blame them or L<join us|https://github.com/oodler577/FreePublicPerlAPIs> in the effort.

=begin stopwords

RESTful libInsult

=end stopwords

=cut