Poem - Don't let Perl stand in poets' way!
use Poem; Just Another Perl Poet no Poem; # get back to work
This module practically make perl accept any poem in any language. Yes, I mean any language. It even accepts poems in Unicode!
Without import options, it prints your poem.
use Poem; There are more than one way to Do it. -- Larry Wall no Poem;
But you can let perl review your poem via
use Poem qw/-review/; There are more than one way to Do it. -- Larry Wall no Poem;
With this option stricture will apply.
# this works use Poem qw/-review/; $Perl = "Practical Extractaction and Report Language"; no Poem; # but not under stricture use Poem qw/-review -strict/; $Perl = "Pathologically Eclectic Rubbish Lister"; no Poem;
If you don't grok your own poem, let perl deparse it.
# Let perl deparse it use Poem qw/-review -deparse/; Just Another Perl Poet no Poem;
If you are an activist rather an a poet, this optin is for you.
# Who said talk is cheap? use Poem qw/-review -act/; Just Another Perl Poet no Poem;
Even if your poem is written in non-ascii, Poem works. But if you want perl to review it, you probably need this option as well. See t/unicode.pl to find out what I mean.
This is a no-op. Consider that a poet's way of saying
use Poem -quiet; Just Another Perl Poet no Poem;
None by default.
Dan Kogai, <email@example.com>
Copyright (C) 2006 by Dan Kogai
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.