if ( $str =~ /^[a-zA-Z0-9]+$/ ) {
  # $str has only alpha-numberic characters
}

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to