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

RE: The YAPC Quest

by buzzcutbuddha (Chaplain)
on Jun 24, 2000 at 00:29 UTC ( [id://19661]=note: print w/replies, xml ) Need Help??


in reply to The YAPC Quest

This worked to get me a date with my now fiance (at least, it worked in English... :) ) 

     use hope;
     $I_Was_Wondering_If_You_Would_Join_Me_For_Coffee_After_Work = 1;
     if (!$you_Drink_coffee)
     {
          $How_About_Soda = 1;
          if (!$you_Drink_Soda)
          {
               $How_About_Water = 1;
               if (!$Thirsty_After_Work)
               {
                    print "Please join me Friday after work.  I'd like
+ to get to know you Heather.";
                    ⌣
               }
          }
     }

[download]
She seriously said to me:
'I don't drink coffee.'
'I don't drink soda after work.'
'I'm not thirsty after work.'
'But I'll be happy to meet you.'
:)
Happy ending for me!

Replies are listed 'Best First'.
RE: RE: The YAPC Quest
by Q*bert (Sexton) on Jun 24, 2000 at 01:17 UTC
    Notice he was so sure of himself that he didn't even bother to include else clauses. ;)
[reply]

In Section Perl Monks Discussion

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://19661]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others sharing their wisdom with the Monastery: (7)
As of 2024-09-20 20:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The PerlMonks site front end has:





    Results (26 votes). Check out past polls.
    Notices?
    • erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.