_ \@ . -\n;
printf You entered: $Input\n;
printf Correct and re-enter\n;
}else {
printf Good data entered!\n;
}
}
Wags ;)
-Original Message-
From: Teresa Raymond [mailto:[EMAIL PROTECTED]]
Sent: Saturday, July 28, 2001 08:59
To: [EMAIL PROTECTED]
Subject: Re: regexp
Let me rephrase what I want to do since I was so unclear the first
time: I want to output an error message every time the input
includes characters that are not the following: A-Za-z0-9_@.- or a
space(s).
At this point, I've tried:
if ($params{$i} !~ /[^\w\@.-\s]/g) {
print Error
Let me rephrase what I want to do since I was so unclear the first
time: I want to output an error message every time the input
includes characters that are not the following: A-Za-z0-9_@.- or a
space(s).
At this point, I've tried:
if ($params{$i} !~ /[^\w\@.-\s]/g) {
print
PROTECTED]
Subject: Re: regexp issues TR
Let me rephrase what I want to do since I was so unclear the first
time: I want to output an error message every time the input
includes characters that are not the following: A-Za-z0-9_@.- or a
space(s).
At this point, I've tried:
if ($params{$i
Hello,
I believe you don't need the /g modifier in that regexp since a single
match to an unwanted character is enough.
Aziz,,,
In article
[EMAIL PROTECTED],
Wagner-David [EMAIL PROTECTED] wrote:
Here is some code which does what you want:
#!perl -w
# A-Za-z0-9_@.-
while ( 1 ) {
On Jul 25, Teresa Raymond said:
I tried the following code to test for bad characters but keep
getting my error msg though the values passed do not contain chars
that are not A-Za-z0-9_@.- (I also reread my last post and found
that my English articulation was very poor, I'm grateful that
I tried the following code to test for bad characters but keep
getting my error msg though the values passed do not contain chars
that are not A-Za-z0-9_@.- (I also reread my last post and found
that my English articulation was very poor, I'm grateful that anyone
responded!).
#TEST FOR BAD