use the regular expression for checking @ and dot and length of some address'
parts:)
for example, try this:
#!/usr/bin/perl
use warnings;
use strict;
use 5.014;
print "enter the email address ";
while (<>) {
if(/\A.{4,15}\@.+?\..{2,3}\Z/) { print "it's correct\n";
} else { print "it is not correct\n";}
}
for my email:
4-15 is length of rozanda2014
2-3 is length of ru (may be com)
10.07.2014, 21:31, "Sunita Pradhan" <[email protected]>:
> I want to write a script which will verify a valid email address .
> Could anybody give some ideas , how to write a pattern for this ?
>
> -Sunita
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
