日本語未対応perlにてsjisで
^[ぁ-ん]+$
^[ァ-ヶ]+$
はどう書きますか?