正規表現道場@2ch

[0240 ダメ男 02/01/06 07:34 ID:rx7aYtfj]

;### 新たに作ってみました。
$_= 'aa14giko9mona033zonu7:@dd+i100';
$SEPA= "\033";
s/((\d+)|(\D+))/$1$SEPA/g;
for ( split($SEPA) ){
　　@catch= (@catch, $_); ## または push(@catch, $_);
}