my $len = length($sup_fullname); if ( $len == 0 ) { $message .= "
You must provide a Full Name.
"; $found_err = 1; } elsif ( $len > 30 ) { $message .= "Full Name is limited to 30 characters.
"; $found_err = 1; } elsif ( $sup_fullname =~ /[^-.'\w\s]) { $message .= "Full Name cannot contain special symbols
"; $found_err = 1; }