YAPFPP (Yet Another Pink Floyd Perl Poetry) to jump on the bandwagon (see Eclipse).
print qq|We @{[keys%$_]} and @{[keys%$_]}\n|x2,values%$_,"\n"for { smile => 'Laughter echoes in your eyes' }, { climb => 'Foot falls softly in the pines' }, { cry => 'Sadness passes in a while' }, { roll => 'Help me roll away the stone' },
Lyrics by Roger Waters © 1995 EMI Records

Replies are listed 'Best First'.
Re: Crying Song
by atcroft (Abbot) on Jun 17, 2002 at 03:03 UTC

    Nice piece of work. Loved the acronym, too.

    Didn't realize they could be so short, but then looked at the lyrics for "One of These Days" (by Waters, Wright, Mason, and Gilmour, from their album Works), and came up with this one:

    split('', $you) if ($day = rand(2))

    Update: I sit corrected-jeffa pointed out that the song originally showed up on their album Meddle before showing up in the Works compilation.