Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re^3: Don't get the output as expect.

by frozenwithjoy (Curate)
on Jun 05, 2013 at 20:38 UTC ( #1037302=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Don't get the output as expect.
in thread Don't get the output as expect.

Glad to hear. Be sure to declare your variables with my so that everything will run when you have use strict; in effect.

Also, you may want to change this:

if ($answer eq "y")

to something like this:

if ( $answer =~ /^y/i )

That way, it will match Y y Ya yes yup Yar, etc. and let you remove two lines of code since you will no longer need to chomp $answer;.


Comment on Re^3: Don't get the output as expect.
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2014-10-20 08:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (73 votes), past polls