2007-11-09 全角数字を切り取る Perl:文法基礎 全角文字は1字ずつばらして、文字コードで正規表現かけたほうが安全? 2バイト文字とか下手するとおかしな事になるからー。 $str = "てすと0"; $str =~ s/(?:\xA3[\xB0-\xB9])//og;