>>533
仕様に詳しくないので正規表現が正しいかどうかは知らないけど、やりたいことはこういうことかな？

use utf8;
my $str = "今日は、2013年10月18日土曜日なのでLOFTへ買い物に行きます";
@result = split /([0-9]+|[a-zA-Z]+)/, $str;

参考:Perlの組み込み関数 split の翻訳 - perldoc.jp
ttp://perldoc.jp/func/split