Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Perl Poetry

( #1590=superdoc: print w/ replies, xml ) Need Help??
"Poetry" is in the eye of the beholder; it could be any of:
  • Poetry written in Perl
  • Using perl to generate poetry
  • Poetry about Perl/PerlMonks
New Poems
How sad.
10 direct replies — Read more / Contribute
by BrowserUk
on Jul 01, 2015 at 01:29

    How sad it is to see, the he that is not me, become the thing that he has long decried.
    The annuated bore, crying for what went before; those lost days of his rose tinted youth.

    So blind he cannot see, his own bigotry; his intolerance of those with whom he disagrees.
    He thinks he is the man; he thinks he has a plan, to suppress the source of his jealousy.

    Although he tries to hide, whilst he is being snide, to protect his once held reputation.
    It doesn't take ESP, to see that it is he, despite his lukewarm refutation.

    With his naughties: "Hate MS" meme; and linux everywhere dream; he doesn't realise, what he has become.
    Despite his tender age, he's really turned the page; now both a dinosaur, and utterly dumb.

A familiar mantra
2 direct replies — Read more / Contribute
by belg4mit
on Jun 21, 2015 at 13:21
Perl sweet Perl
1 direct reply — Read more / Contribute
by hda
on Jun 16, 2015 at 15:21
    Long ago, with Fortran 77
    using old unglamorous computer
    I cut my programming teeth
    totally unpretentious
    but nicely real and free

    In discovering Perl long after
    I soared high, far and glad,
    with scalars, arrays and hashes,
    PDL and CPAN gave me fantasy
    and serious wings to fly

    I then left home
    don't know exactly why
    flirting with other languages,
    only to come back, older and tired
    to my and yours faithful Perl

    In coming back to this realm
    among penguins and camels
    I finally find the peace and light
    among you wise and gentle monks
    in this one, that I can truly call
    my natural and only home

Happy families
No replies — Read more | Post response
by chacham
on May 21, 2015 at 13:48

    I love OOP, You love C,
    C++'s family.
    All the classes made it seem,
    That i would love this language stream.

    I love OOP, You love Perl,
    Let's take Moose out for a whirl,
    All the symbols make it seem,
    It only takes a package stream.

You work and you learn
No replies — Read more | Post response
by chacham
on Apr 30, 2015 at 09:55

    I spent hours and hours on what not to see,
    (To extend ignored users, specifically,)
    So that it would work in last hour of cb
    And then ambrus responded with simplicity.

    I tried using javascript, with Greasemonkey installed,
    For "editing scripts", it's normally called,
    With testing and googling, i was enthralled,
    Then a Perl Monks Discussion, to show what i scrawled.

    But, .chatfrom_<some digits>, when i took a peek,
    I mistakenly thought, was to keep it unique,
    Corion explained, ambrus's critique,
    It's the monk's node id, and not that oblique.

    You work and you learn, even when it's for naught,
    And look on with pride, when you see what you wrought,
    Though the answer is different than i previously thought,
    I'm happy i did it, i reached what i sought.

    --

    Update: 4th stanza, 1st line, changed "all is" to "it's".

PM XP is just a game
3 direct replies — Read more / Contribute
by chacham
on Feb 04, 2015 at 16:40

    PM XP is just a game,
    I know, but yet, and just the same,
    The points and levels as they might,
    Add extra fun to PM's site.

    With each and every node a score,
    Begs to some to come for more,
    It sends a message loud and clear,
    Please come back, we love you here.

    But if you hang around for long
    You'll hear another PM song,
    That you should just ignore XP
    And let those silly numbers be.

    The points are simply for the node,
    Regardless of what you have been told,
    It's not a pat or user slight,
    It's based upon a node's own might.

    Who can argue with what's right?
    I'd like to say i've seen the light.
    But still deep down the voices say
    How many points you have today!

    Am i wrong to say i care?
    Or any time i look what's there?
    Or where i rank inside the Book,
    Not that i'll admit i look.

    Perhaps a game, though on the side,
    With content being the main stride,
    As long as you act in that way,
    It's okay if you like to play.

KC's Sunshine (not an original poem)
No replies — Read more | Post response
by KurtSchwind
on Jan 29, 2015 at 15:12

    A little bit of KC's Sunshine. Enjoy!

    #!/usr/bin/perl # Kurt Schwind: A little of KC's Sunshine use strict; use warnings; my @l = qw( a aah best booty can chance come dance do don't down duty everybody feeling feelings fight floor get give home I in it let's momma now Oh on run shake sister tell the to very well with world yeah you You your You're yourself); sub line { my $j = shift; while(defined $j ) { print $l[$j]." "; $j = shift; } print "\n"; } sub refrain { for(1..6) { print $l[29]." "; } print "\n"; line (29,41,3); line (29,41,3); for(1..6) { print $l[29]." "; } print "\n"; line (29,41,3); line (29,41,3); print "\n"; }; sub groove { for(1..5) { print $l[29]." "; } line (41,3); }; line (1,12,17,27,32,16,23,7); line (9,15,41,14,18,43,0,5); print "\n"; refrain(); line (1,39,4,39,4,8,22,34,35); line (42,32,2,21,32,37,20,4,31); print "\n"; line(26); refrain(); line (26,38); line (29,29,29,29); line (1,29,29,29,29); print "\n"; line(1); refrain(); line(1); groove(); line(1,9,15,32,13); groove(); line(1,18,43,0,5); print "\n"; groove(); line(42,4,8,22,8,22); groove(); line(6,19,36,24,25); groove(); print "\n"; groove(); line(1,28,10,33,30); line(29,29,29,29,27,41,3); line(1,8,41,11); line(29,29,29,29);
    --
    I used to drive a Heisenbergmobile, but every time I looked at the speedometer, I got lost.
404 page
No replies — Read more | Post response
by Transalp
on Jan 14, 2015 at 09:58
    print "Content-type: text/html\n\n"; my @into_the_stream = qw( 1 2 3 ); my $stepsound = "..step"; print "You step into the stream .."; foreach my $step (@into_the_stream) { print "<H".$step.">".$stepsound."</H".$step.">"; if($step == 3) { sleep 1; print "<br>But the water has moved on"; sleep 1; print "<br>Sorry, this page is not here"; } }
A new year is here
No replies — Read more | Post response
by chacham
on Jan 08, 2015 at 12:44

    A new year is here, but where?
    The four to five is live, do i care?
    A few will renew, but time is due,
    The stuff is old enough, let's review.

    The end of December i remember, a glowing ember.
    Scoff at days off?! Been waiting since November!
    Our mood ensued, and delicious food,
    Even the restive were festive, no more feuds.

    But i fear it's clear, the new year,
    A slow start in part, but we're here.
    Politics back on track, poised to attack
    The anointed pointed, picked up the slack.

    The new is bold, but old and cold,
    Again and then, or so i'm told.
    The end had a trend, people would bend,
    It didn't stay, but the day, i await my new friends.


    Update:
    its->it's
    annointed->anointed
Nol, Nol
2 direct replies — Read more / Contribute
by Athanasius
on Dec 25, 2014 at 01:03

    It’s Christmas! Ring the Monastery bell,
    As we with joy recall that first Nol
    When shepherds, watching through the lonely night,
    Were over-awed by heaven’s glorious light.

    With cheer, we’ll greet our brother monks, and sisters,
    And amnesty extend to Pythonistas,
    And other erring souls; foreach, today,
    We wish bright blessings in a long @array.

    And tho’ at times, alas!, we make a %hash
    Of our Monastic Rule, with insults rash
    And words unkind: today we start anew
    And map our way with kinder goals in view.

    A maid needs help with syntax? We’ll not fail ’er.
    A hill of bugs is in our way? We’ll $scalar.
    Tho’ all the year in Perl we script — and well, —
    Today it’s “Per”, in honour of Nol.

    © 2014

    Merry Christmas!

    Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,


Add your poem
Title:
Text:
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!
  • 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, 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, 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.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    and the web crawler heard nothing...

    How do I use this? | Other CB clients
    Other Users?
    Others exploiting the Monastery: (6)
    As of 2015-07-04 08:00 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









      Results (58 votes), past polls