Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Perl, I'm coming home...

by Discipulus (Monsignor)
on May 25, 2017 at 20:36 UTC ( #1191255=note: print w/replies, xml ) Need Help??


in reply to Perl, I'm coming home...

$title = join' ',$^X,$self->verb($self->pronoun,'be'),qr/co[md]ing/,'~ +'; while($sheep->return($fold)){ print "$sheep is returned from the kingdom of nouns.\n"; if ($sheep{pockets}=~s/$exotic_beans//r){ warn "$sheep needs some penance!\n"; $sheep->clean('cloister') for 1..42; } else{ eval{print "The compiler is near you again $sheep";} $sheep{pockets}=$@ if $@; } $all_monks->chorus("Welcome back $sheep!\n"); }

PS for the corious..

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.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1191255]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2018-01-18 00:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How did you see in the new year?










    Results (206 votes). Check out past polls.

    Notices?