Don't ask to ask, just ask | |
PerlMonks |
Re: Subroutine Loopby james28909 (Deacon) |
on Dec 06, 2015 at 16:58 UTC ( [id://1149518]=note: print w/replies, xml ) | Need Help?? |
I think your are chomping $ans in sub callandrespond and then testing it with sub tryagain5 while ($count < 5 and $ans =~ /^\s*\n/) which will fail I am pretty sure because you are testing if the string has a newline at the end, which it never will because you are chomping it.
In Section
Seekers of Perl Wisdom
|
|