Shireroth

Quote: #!/usr/bin/perlprint "Do you have a chicken?\n";$answer = ;chomp ($answer);if ($answer eq "yes&quot {&nbsp &nbsp &nbsp &nbsp print "Good person, What is its name?\n";&nbsp &nbsp &nbsp &nbsp $answer2 = ;&nbsp &nbsp &nbsp &nbsp chomp ($answer2);&nbsp &nbsp &nbsp &nbsp print "$answer2 is a good chicken!\n";&nbsp &nbsp &nbsp &nbsp } else {&nbsp &nbsp &nbsp &nbsp print "How sad. Go get one!\n";}Enjoy...hehehe Kaiseress Viviantia IKaiseress of ShirerothSAVE THE KIWI!

"LIBERATE THE CHICKENS"- SanderD, when viewing this scriptBTW, I would have written that script this way:#!/usr/bin/perlprint "Do you have a chicken? ";chomp ($_ = );if (/^y/i) # "y", "Y", "yes", "yea" all work{ print "Good person. What's its name? "; chomp ($_ = ); print "$_ is a good chicken!\n";}elsif (/^n/i) # whoops, no chicken found. Time to bail out.{ print "How sad. Go get one!\n";}else # you mean what?{ print "Huh?\n";} Inconsistency is the ancient karmic dragon of a brilliant mind.

Yes, well.. I haven't gotten that far now yet, now have I? hehe Kaiseress Viviantia IKaiseress of ShirerothSAVE THE KIWI!

hehehe Sander DielemanChancellor of the Micronation of PacaryVP of Operations of Bobbesian AirwaysHPi of PiColonel of the PMDie hard Pokey the penguin fanICQ#104572163 - MSN sanderdieleman@hotmail.com - AIM SanderDieleman

I lost that script and my others though... but I got 2.5 more gigs...hehe Kaiseress Viviantia IKaiseress of ShirerothSAVE THE KIWI!