Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Comment on

( #3333=superdoc: print w/replies, xml ) Need Help??

This is my first attempt at perl poetry, so please consider that.

Inspired by katgirl's excellent Bohemian Rhapsody (part 1) (and part 2), I attempted the following, an attempt at "Eclipse" from The Dark Side of the Moon by Pink Floyd, written by Roger Waters. (Good song-I can only claim the any bugs in the interpretation. My appreciation to all those where were in the CB who helped with some questions while I was attempting to code this.)

%All; %Everyone; %Everything; $light = "sun"; @all_that_you = qw(touch see taste feel love hate give deal buy beg bo +rrow steal do say eat slight); @all_you = qw(feel distrust save create destroy); @everyone_you = qw(meet fight); @all_that_is = qw(now gone to_come); @everything_under = ("the sun"); @All{@all_that_you, @all_you, @all_that_is} = ("in tune") x (@all_that +_you, @all_you, @all_that_is); @Everyone{@everyone_you} = ("in tune") x @everyone_you; @Everything{@everything_under} = ("in tune") x @everything_under; my $light = "moon"; $dark_side_of_the_moon = undef; $all = "dark";

Update: Found and added link to page containing lyrics after someone suggested that it might be hard to follow for someone unfamiliar with the lyrics. Enjoy.


In reply to Eclipse by atcroft

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, 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?
    [choroba]: he's not really sick, we just got nobody to look after him today
    [Discipulus]: create an account for him; we are funny baby sitters ;=) come here child, want to listen the typeglob tale?
    [vrk]: choroba Oh, that's good.
    [vrk]: Discipulus I don't know much about prime numbers, but wouldn't that kind of an answer be in a graduate-level number theory book?
    [Discipulus]: my 8 yo daughter has two weeks of sleep disturbs.. we are gonna be crazy..
    [Discipulus]: vrk i searched but found nothing: after this my math level if terribly low but i like to discuss my discovery with kind mathematicians

    How do I use this? | Other CB clients
    Other Users?
    Others chilling in the Monastery: (3)
    As of 2017-04-27 08:01 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?
      I'm a fool:











      Results (501 votes). Check out past polls.