Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Tribute to Red Green

by grep (Monsignor)
on May 30, 2003 at 05:06 UTC ( #261767=poem: print w/ replies, xml ) Need Help??

package Women; sub AUTOLOAD { return you_handy(); } sub you_handsome { return 'found' } sub you_handy { return 'found' } "The Red Green Show";


grep
Mynd you, mønk bites Kan be pretti nasti...

Comment on Tribute to Red Green
Download Code
Re: Tribute to Red Green
by kutsu (Priest) on May 31, 2003 at 04:07 UTC

    I have two, I like the second better:

    my $man = "yes"; print "I can change, I guess" if $man = "yes";

    my $tool = "duct tape"; my $job = "any"; if ($job = "any"){ use $tool; }

    This is my first poem, but I had to post for Red Green, I love that show


    "Pain is weakness leaving the body, I find myself in pain everyday" -me

      hi, I dont want to ruin the content of you poem, but shouldn't that be :
      print "I can change, I guess" if $man eq "yes";

      and:
      if ($job eq "any"){ use $tool; }

        Oops, I was tired when I posted that, so I guess I missed it


        "Pain is weakness leaving the body, I find myself in pain everyday" -me

      And the OO version :)
      #Bow your heads for the mens prayer $I->{m} = a man; but($I->can('change')) if ($I->have_to() && $I->guess());
Re: Tribute to Red Green
by kutsu (Priest) on Jun 08, 2003 at 01:24 UTC

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: poem [id://261767]
Approved by Mr_Person
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (6)
As of 2014-12-27 03:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (176 votes), past polls