#1168(水原麗名氏)の書き込みを引用します:
＞$FORM{'q03'} =~ /^[A-Za-z]+$/ or &error('入力エラー','英字以外が含まれています');
＞です。+が重要。

おかげ様で出来るようになりました。
大変お世話になりありがとうございました。