if( $emailaddress =~ m!\@[.a-zA-Z0-9]+\.[a-zA-Z0-9]+$! ) {
$emailcheck++
}
[download]

But it's too simple to really check an email address..

Update

I only tried to answer simply to the question and adviced him to look for a more serious solution
___________________
Hope this helps