09/07/05 17:05:36
>>532
後ろの1文字ってマッチする？
マッチするなら
1 while $str =~ s|/([0-9][^0-9])|/0$1|gm;
でいけるんじゃない
09/07/05 17:05:36
>>532
後ろの1文字ってマッチする？
マッチするなら
1 while $str =~ s|/([0-9][^0-9])|/0$1|gm;
でいけるんじゃない
09/07/05 17:05:36
>>532
後ろの1文字ってマッチする？
マッチするなら
1 while $str =~ s|/([0-9][^0-9])|/0$1|gm;
でいけるんじゃない