This one is old and quite cheesy, but I just came accross it and it was never posted here. I hesitated some but then I figured that there weren't taht many cheesy love poems in Perl, so I might just as well thow it in. I guess a few of the lines are ok. It doesn't do anything... 

my @nais;

package Your::Love;
seek mine,
            sweetly,softly;


open me; tell me or simply smile;
use less words;
use Symbol;
no strict love;


study me and sin 27*times if tied $you[$me];
bless \$bliss and dump 'the rain' until dawn;


read my $lips, my $heart, my $self;
 require me while /all is sleeping/;
  accept(kiss,tenderness);
   send(love,lust,love);
  listen(heartbeat, my $breath);



sub terranean {
    $feelings = shift,
                unshift all,me,you,
                splice you,me
                and pop;

    last long while exists $endless{us};
    select me; tell me, write me;
    rename me,yours; #in a fury of love
    redo if not dawn;

    while (join robyn,@nais) {
        pack us tight and
                    push @ll, the dark away;
    }
    continue {
        reverse us; sort us; kill us;
    }


    next fork,
            and reset;
    unlink us; split /a while/, then,
    return to me;

    "I am all yours";
}

sleep well, and wait for time;

[download]

-- darobin

In reply to An old love poem by darobin

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.