in reply to Re: Detect presence of numbers 1-9
in thread Detect presence of numbers 1-9
# or even: $scalar =~ /[^1-5]/ ? &is_bad : &is_good; print $scalar =~ /[^1-5]/ ? "bad" : "OK!"; $scalar !~ /[^1-5]/ && print "OK!"; print "OK!" unless $scalar =~ /[^1-5]/; print "OK!" if $scalar !~ /[^1-5]/;
STATMWTDI cheers
tachyon
s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print
|
---|
In Section
Seekers of Perl Wisdom