Jason Balicki wrote:
This should be a quickie, I hope:
I'm parsing an array that contains things like Zap/1 Zap/2 Zap/3 ... etc.
I'm only concerned with Zap/32 - Zap/47.
Will this work:
if (($zapdef eq "Zap/*") and ($zapdef eq
"*[32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47]*")) {
dostuff();
}
and even if it does, is there something else that would be more elegant?
Thanks a bunch, my eyeballs are melting.
if ($zapdef =~ m|^Zap/(\d+)$| and $1 >= 32 and $1 <= 47) {
:
}
Rob
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
