Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: do-while loop question

by grinder (Bishop)
on Mar 13, 2003 at 11:02 UTC ( #242646=note: print w/replies, xml ) Need Help??


in reply to do-while loop question

You could do away altogether with your 'this or that' conditional by simply using:

do { ... } while lc($make_account) ne 'y';

or

do { ... } while $make_account !~ /^\s*y/i;

... so that if they accidently lean on the space bar it will ignore the spaces (and tabs)...


print@_{sort keys %_},$/if%_=split//,'= & *a?b:e\f/h^h!j+n,o@o;r$s-t%t#u'

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (2)
As of 2018-07-22 14:39 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?















    Results (454 votes). Check out past polls.

    Notices?