;;
chomp($ans = );
} while $ans !~ /^\d{6}$/;
print "$ans\n";
Rob
-Original Message-
From: Ned Cunningham [mailto:[EMAIL PROTECTED]
Sent: Monday, August 18, 2003 1:08 PM
To: '[EMAIL PROTECTED]'
Subject: Input Regex (error checking)
HI,
What would be the best w
HI,
What would be the best way to check for data integrity of an input?
Chomp (my $ans=);
#first make sure data is 6 digits
make sure length is 6
Thankx
Ned Cunningham
POS Systems Development
Monro Muffler Brake
200 Holleder Parkway
Rochester, NY 14615
(585) 647-6400 ext. 310
[EMAIL PROTECT
