半角スペースを自動で入れる[computer]

http://blog.livedoor.jp/dankogai/archives/50740024.html

my $east = qr/(?!\p{M})(?:\p{Han}|\p{Katakana}|\p{Hiragana})/;
my $west = qr/(?!\p{M})(?:\p{Latin}|\p{Greek}|\p{Cyrillic})/;

こんな書き方ができるのか!!
すげー。知らんかった。

permlink