http://www.perlmonks.org?node_id=1590
"Poetry" is in the eye of the beholder; it could be any of:
New Poems
I've Got Friends
No replies — Read more | Post response
by perldigious
on Jan 02, 2023 at 01:21

    In conjunction with my final meditation, I give you the return of The Drunken Poet. Written in the "Weird Al Song Parody" style to be sung to the music of Garth Brooks' "Friends in Low Places". For those non-Americans, or for those who simply hate country music, forgive me... I'm from the Midwest in the USA. :-)

    Friends in Perl Spaces

    I blame it all on these kooks,
    with their pink-hued rat books.
    They've ruined my Perl love affair.
    
    As they all crow,
    I tell you this really blows.
    I'm the last one to hold out and care.
    
    And imagine my cries
    as the world fell for their lies.
    On my face is written the pain.
    
    And they boasted too,
    said, "ha, ha now you are screwed,"
    and I'll never cease to complain!
    
    But I've got friends in Perl spaces
    where the $igils lead
    and the postfix chases extra lines away.
    @will_miss_it = $every_day->@*;
    
    Yeah, I'm not big on syntax white spaces.
    Their monotonous code is causing brain stasis!
    Oh, I'll miss my friends in Perl Spaces!
    
    Well, I guess I was wrong.
    Python zeal is too strong.
    It's past time I acknowledge the score.
    
    I put up a good fight,
    not gently in to the night,
    but now I'm knocked out on the floor.
    
    It's almost obscene
    the snake cult followers gleaned,
    and I can't escape it again.
    
    They say that I
    have to submit to their power,
    no, I just can't win!
    
    But I've got friends in Perl spaces
    where the $igils lead
    and the postfix chases extra lines away.
    @will_miss_it = $every_day->@*;
    
    Yeah, I'm not big on syntax white spaces.
    Their monotonous code is causing brain stasis!
    Oh, I'll miss my friends in Perl Spaces!
    
    I'll miss my friends in Perl spaces
    where the $igils lead
    and the postfix chases extra lines away.
    @will_miss_it = $every_day->@*;
    
    Yeah, I'm not big on syntax white spaces
    Their monotonous code is causing brain stasis
    Oh, I'll miss my friends in Perl Spaces!
    
    I'll miss my friends in Perl spaces
    where the $igils lead
    and the postfix chases extra lines away.
    @will_miss_it = $every_day->@*;
    
    Yeah, I'm not big on syntax white spaces
    Their monotonous code is causing brain stasis
    Oh, I'll miss my friends in Perl Spaces!
    
    Yeah, I'll miss my friends in Perl Spaces!
    
    

    Just another Perl hooker - My clients appreciate that I keep my code clean but my comments dirty.
for beginners
1 direct reply — Read more / Contribute
by Cobweb
on Dec 17, 2022 at 16:56

    "print" in Perl,

    "Hello World!"

    Congrats to you,

    Although you're new,

    First step's taken,

    Walls are breakin'

    And if you're stuck,

    By any luck,

    Perl Monks dear,

    With advice here,

    Shall through your night,

    Shine their own light

    Your problems solve

    Perhaps dissolve!

    So do not fear,

    'Cause help is near!

    So give your odes,

    To Perl codes!

Is this a limerick?
No replies — Read more | Post response
by Cobweb
on Dec 14, 2022 at 11:38

    Rather underrated,

    Sometimes kinda hated,

    Perl is a language,

    Only causing anguish,

    When highly debated.

contentment, finally
1 direct reply — Read more / Contribute
by silent11
on Oct 14, 2021 at 17:57

    i visit this site, about once a year

    nostalga burns bright, then fades into fear


    same questions posted, like back in the day

    chatterbox quiet, not much to say()


    life is a cycle, times they move fast

    but joy's found looking forward, not in the past


    I'm finally content, 2 decades hence

    resigned this will __END__, t'was quite the experience


    like your favorite module, lastly return true

    1; is so boring, end yours "with whatever you want to";


A pensive musing...
No replies — Read more | Post response
by Polyglot
on Aug 31, 2021 at 09:55

    Perlimerick

    Perl, once my ally, threatens now to become my nemesis.
    Without her, perhaps, I'd be in line for a new genesis.
         But such is the enigma
         That she would bring such stigma
    And place me, unexpectedly, into such antithesis.

    Blessings,

    ~Polyglot~

fine as you go
No replies — Read more | Post response
by Anonymous Monk
on Jun 23, 2021 at 06:01
    perl - what are you on about? me - you've led me so deep in the mire how are either of us to know? use lib '.'; use soandso; there happens to be a dirth of package soandso anywhere yet we merrily + whizz along
Regex On Your Tombstone?
12 direct replies — Read more / Contribute
by McD
on May 19, 2021 at 10:15

    Hello Monastery - long time, no see.

    As the Brothers here grow old and gray (or grey, I suppose - TMTOWTDI), we must surely be contemplating the eternal.

    Leading me to wonder this morning... What's a good regular expression for your tombstone?

    Maybe:

    die "Normal termination" if /life$/;

    Share your best idea!

12 days of Perl?
4 direct replies — Read more / Contribute
by johnaj
on Apr 29, 2021 at 22:03

    I've been working on an exercise to generate the English "Twelve days of Christmas song". So far, I've come up with the following:

    for(<DATA>){s/%/ing/;$_=($i++?$i-1+print" ":a)." $_";print"On the $i",(st,nd,rd)[$i-1]||th," day of Christmas, my true love gave to me: ",$t=$_.$t}__DATA__ partridge in a pear tree. turtle doves and French hens, call% birds, golden rings, geese a-lay%, swans a-swimm%, maids a-milk%, ladies danc%, lords a-leap%, pipers pip%, drummers drumm%,

    That generates the following text:

    My script is 343 bytes, which is better than zip and tar+gzip but worse than gzip:

    -rw-r--r-- 1 john john 294 May 1 13:29 12days.gz -rw-r--r-- 1 john john 343 Apr 30 04:00 12days.pl -rw-r--r-- 1 john john 370 May 1 13:30 12days.tar.gz -rw-r--r-- 1 john john 2169 May 1 13:29 12days.txt -rw-r--r-- 1 john john 439 May 1 13:30 12days.zip

    Does anybody have a shorter solution? For simplicity's sake, I've limited the challenge to digits rather than written numbers.

Binary Comedy -- 01 - 000001
No replies — Read more | Post response
by Discipulus
on Apr 07, 2021 at 12:32
                                                                               to my father, sure of his pardon :)
    
    
    

    L*

    There are no rules, there are no thumbs..
    Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.
@ISA happy memory
1 direct reply — Read more / Contribute
by silent11
on Feb 10, 2021 at 19:18
    I don't post logged in,
    socials link to my handle.
    I return every few years,
    get filled with nostalgia.
    Now back to work,
    to do whatever.
    But not with my Perl,
    not today, and likely not ever.

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":