document.write('');
document.write('
sub validate_email
{');
document.write('
my ($email)=
@_;
');
document.write('
');
document.write('
if($email =~
m/^
([a-zA-Z0-9_\.\-
])+\@
(([a-zA-Z0
-9\-
])+\.
)+
([a-zA-Z0
-9]{2,
4})+$/
s) {');
document.write('
return 1');
document.write('
} else {');
document.write('
return 0;
');
document.write('
} ');
document.write('
}');
document.write('
');