OK, this is not to publish my own piece of poetry, this time, but just to share a nice browsing experience that I had.

I was surfing in the outside world, looking for some specific Perl scripts, when I fell on that site.

I don't think that the guy is knowing about PerlMonks (he does not have any link to perlmonks.org), and I have searched perlmonks.org for some of his creations but did not find anything similar here.

I concluded that we should bless this person, send him an email, invite him to PerlMonks, give him direclty the status of Monk... I think he deserves it, read this example:

#!perl
#gk_poetry 5 novembre 98 Guy Kastenbaum gkasten@filnet.fr

$s="tay here ";
open(YOUR,"eyes");
open(MY,"heart");

while (($time_is=<YOUR>)&&$s)
{
        $time_is=~s/e/n/s;
        $time_is=~s/t/e/m;
        $time_is=~s/a/d/;
        $time_is=~s/A/D/ism;
        print MY $time_is."\n\t";
        $s.="top " if $time_is=~/over/;
        $s.="till " if $time_is=~/money/;
        last if $s=~/tay here till top/;
}
close MY;
print "I ".((-f "heart")?"beat":$s) ;
close YOUR;$s;
__END__

[download]

In reply to Let's bless this Perl Poet! by gaggio

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.