Bruce Ferrell wrote:
if ( ! defined $username || ! $username =~ /[0-9]{10,11}/ ) {do something; } else { do something else; }
if ( $username and $username =~ /\A[0-9]{10,11}\z/ ) {
...;
}
else {
die;
}
--
Ruud
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
