You could use 'for' instead of 'while' in this case, I think. Example:
my @inlocation = (one,two,three,four,five,six,seven);
for (@inlocation) {
if(($_ eq "two") or ($_ eq "four") or ($_ eq "six")) {
print "$_ is an even number. \n";
}
else {
print "$_ is an odd number. \n";
}
}
Scot Robnett
inSite Internet Solutions
[EMAIL PROTECTED]
[EMAIL PROTECTED]
-----Original Message-----
From: Teresa Raymond [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, May 01, 2002 6:35 PM
To: [EMAIL PROTECTED]
Subject: $_ and while stmt
I'm trying to test @inlocation to make sure it is not null or filled
in with a space but although I input via ckbox a value, the error msg
is returned. I am not comfortable using the while or the $_.
while (length @inlocation)
{if ($_ eq "" || $_ eq " ")
{
print "Error location is required\n";
}
}
--
-------------------------------
- Teresa Raymond -
- Mariposa Net -
- http://www.mariposanet.com -
-------------------------------
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.351 / Virus Database: 197 - Release Date: 4/19/2002
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.351 / Virus Database: 197 - Release Date: 4/19/2002
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
