6.2 文字にマッチするパターン

Perl Cookbook

文字列を構成しているのがアルファベットだけかどうか確認したい。

# Unicodeのプロパティを使用
if ($var =~ /^\p{Alphabetic}+$/) {   # または単に/^\pL+$/
  print "var is purely alphabetic\n";
}

# 上記以外の方法
if ($var =~ /^[^\W\d_]+$/) {
  print "var is purely alphabetic\n";
}