#!c:/perl/bin/perl -w print “Content-Type: text/html \n\n”; $email=”tspradeepkumar\@yahoo.com”; print $email; if($email =~ /^(\w|\-|\_|\.)+\@((\w|\-|\_)+\.)+[a-zA-Z]{2,}$/i) { print “\n $email is a valid id”; } else { print “\n Provide [...]
Continue reading url and email validation using Perl Regular expression




