$HumptyDumpty->sit( on => 'wall' );
$HumptyDumpty->fall( 'great' );
foreach( $King->Horses(), $King->Men() ) {
   exit(0) if $_->put_back_together_again( $HumptyDumpty );
}
die "Couldn't put " . $HumptyDumpty . " back together again";

#############################################################

$baby->hush( 'a-bye' );
push @tree_top, $baby;
while( $wind->blows() ) {
   $cradle->rock();
   last if $bough->breaks();
}
$baby->fall();
map { $_->down() } ( $baby, $cradle );

#############################################################

warn "Fee! Fie! Foe! Fum!";
$_ = new Smell( 'blood', 'Englishman');
if( $_->live() or $_->dead() ) { #this will never fail
   my $bread = $_->grind_bones();
}

#############################################################

$Mary->Lamb( little => 1, fleece => 'white as snow' );
go( $Mary ) and go( $Mary->Lamb );

#############################################################

print "Baa Baa";
if( exists $black_sheep->{'wool'} ) {
   print "Yes sir"x2;
   @wool = ($black_sheep->{'wool'})x(3 * $bags);
   
   ($master, $dame) = @wool;
   
   if( $little_boy->lives( 'down the lane' ) ) {
      $little_boy = shift @wool;
   }
}

[download]
Hope that helps!

It's not what you look like, when you're doin' what you’re doin'.
It's what you’re doin' when you’re doin' what you look like you’re doin'!
     - Charles Wright & the Watts 103rd Street Rhythm Band, Express yourself

In reply to For the wee ones - perl Nursery Rhymes by qbxk

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, details, 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, summary, 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.