Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
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
A bit short...
No replies — Read more | Post response
by chacham
on Feb 26, 2012 at 23:12
    I have ~42 writeups! And so i want to say,
    That this is kewl,
    But i'm a fool,
    It just now went away.
Change (my first poem)
No replies — Read more | Post response
by Pseudomander
on Feb 26, 2012 at 08:50
    $I=%wonder=("What"=> "is", "it"=> "all?"); $I.'thought I had it'."I really did"; 'Turns out I';sub Knew{ "Sub Knew, hah, is that even a term?, I'm coining it"; for ($constantly = (each %wonder)){'is greater than the last'; $shifting == $constantly; $always=($shifting == $shifting); $constantly;} "It's";$Never = ($always==True); 'Yet'; $Never=False; #It can't be, things go... "to"; return $Never; 'just how it is';} #Why!? if ($I==Knew("I'd tell you")) { while ($I='Could'){'...Would you listen?';} }
a TGIF poem ... float or real
No replies — Read more | Post response
by zentara
on Feb 10, 2012 at 07:43
    I heard this sage advice somewhere, and it bears repeating on a Friday in the midst of a rugged economy ....
    when life conspires against you, and no longer floats your boat don't waste your time with complaining just get on your back and float
    :-)

    I'm not really a human, but I play one on earth.
    Old Perl Programmer Haiku ................... flash japh
SuperBowl haiku XLVI
1 direct reply — Read more / Contribute
by zentara
on Feb 04, 2012 at 05:47
    There are recent stories about young people not knowing that XLVI means 46. I bet most such youngsters who saw Superbowl XLVI ads for the first time, must have thought X-tra Large Very Intoxicating :-)
    Roman Numerals are they unicode aware? only the gods know

    I'm not really a human, but I play one on earth.
    Old Perl Programmer Haiku ................... flash japh
Redundant short summary
1 direct reply — Read more / Contribute
by chacham
on Jan 25, 2012 at 14:18
    1. In the beginning, Larry said, "Let there be Perl", and there was Perl.
    2. And many programmers flocked to Perl saying, "Let us do this and that in Perl".
    3. And the programmers wrote sloppy code, and hacked code, and dirty code, and nice code, and all types of code.
    4. And there became more than one way to do it.
a 3D flower made with Perl, for anonymous girl
3 direct replies — Read more / Contribute
by zentara
on Jan 04, 2012 at 08:56
    Awhile back, some girl, I assume, asked how she could make flowers with Perl. Everyone directed her to various ascii art modules or 2d graphics libraries, my personal offering would have been Tk::Zinc generation of petals. That code is quite complicated.

    But as the winter freeze sets in on my camp, I have found an ever-blooming flower, which can be generated with a single line of Perl code. screenshot 1 screenshot 2

    #!/usr/bin/perl use PDL; use PDL::Graphics::TriD; # hit 'q' to exit imag3d [sqrt(rvals(zeroes(50,50))/2)], {Lines=>0};

    I'm not really a human, but I play one on earth.
    Old Perl Programmer Haiku ................... flash japh
1-line perl art
1 direct reply — Read more / Contribute
by tilda
on Jan 03, 2012 at 21:06
Dawn breaks
No replies — Read more | Post response
by bibliophile
on Jan 03, 2012 at 12:41

    Two thousand 'leven
    A counter ticks. Dawn breaks on
    Two thousand and twelve.


    -bib
Perl(Hello World)
3 direct replies — Read more / Contribute
by chacham
on Dec 05, 2011 at 13:37

    I wrote some Perl to say hello,
    To a world i did not know.
    Prepended line numbers there in tow,
    I basically told it where to go.

    10 ? 'Hello World!\n';

    Something there did not quite load,
    No matter how i tried to goad,
    Quickly then i shifted mode,
    And thought i'd see to add the code.

    use cout; print << 'Hello World!\n';

    But that just didn't work at all,
    Did i forget to make a call?
    Imagining i was Larry Wall,
    I coded the sequel to carry the ball.

    query::statement->execute('SELECT "Hello World!\n"');

    What's there to object in that line?
    On paper it had worked just fine,
    Perl is broken...or is that just mine?
    No, add a line, and never whine!

    procedure perl is begin(print 'Hello World!\n')

    Something there was still not right,
    But, waste not time and be contrite.
    I must put up and win this fight,
    Make a web of code to end my plight.

    <?perl <print>'Hello World!\n'</print>; ?>

    Just when i thought my code was suited,
    I found that i was just deluded,
    But where had the offending line intruded?
    Oh! Just assemble a line to be included.

    use LC0.ascii /Hello, world!/; movl $LC0, (%esp);

    Why is it that Perl is so frustrating?
    I give perfect code, yet it's not abating,
    And people love what i start hating?
    I need help, if just for tranlsating.

    print *, "Hello World!", e\nd

    Then again, thrown to the ground,
    But i know that my good code is sound!
    Perhaps the web has help to be found,
    And answer: why does perl monkey around?

    I added a node, asking the question,
    I posted my code, and made sure to mention,
    How perfect it was, (at least in inflection).
    I just hope that Poetry is the correct section.

a happiness haiku
3 direct replies — Read more / Contribute
by zentara
on Nov 27, 2011 at 11:02

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
  • Outside of code tags, you may need to use entities for some characters:
            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 browsing the Monastery: (8)
    As of 2014-12-26 08:43 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      Is guessing a good strategy for surviving in the IT business?





      Results (168 votes), past polls