- or download this
use CGI qw(:standard);
print "content-type:text/plain\n\n";
my $query = CGI->new();
- or download this
use CGI qw(:standard);
my $query = CGI->new();
print $query->header('text/plain');
- or download this
# Typo?
if($Phonenumber=!/^[6-9]+\d/)
# Fixed, but...
if($Phonenumber !~ /^[6-9]+\d/)