Perlについての質問箱 32箱目
■ このスレッドは過去ログ倉庫に格納されています
0068デフォルトの名無しさん
2007/08/15(水) 21:10:39なんか、誰かさんと違って、感じが良くて教え甲斐のありそうなヤツだな。
オレだったらこう書く
print "引用番号: $1" if ($string =~ /(>>[0-9][0-9][0-9])/);
それ以外にも、
$string =~ /^(.*)(>>[0-9][0-9][0-9])(.*)$/);
と()で囲めば $` $& $' のかわりに $1,$2,$3 を使える。
オレは必要だと思ったらとにかく()で囲む。
他の人がどうだかは知らないけど。
■ このスレッドは過去ログ倉庫に格納されています