my $good_chars = $FORM{'phone'} =~ tr/-()0-9. //;
$good_chars += 3 if $FORM{'phone'} =~ /ext/i;

if (length($FORM{'phone'} - $good_chars) > 4) {  # Accept <= 4 bad
   # Bad phone number!
   ...
}