マッチ変数（Perl）

正規表現でカッコ( )で囲まれた部分は、メモリに記憶される。
正規表現のなかで、これを参照するには、\1、\2 として後方参照します。

Perl文の中では、正規表現メモリの内容は、$1、$2のような名前のスカラー変数に、格納される。
$4には、４番目のカッコのペアにマッチした文字列が入っている。

——————————–
#!c:/Perl/bin/Perl.exe -w

print "Content-type:text/html\n\n";

$_ = "Hello there, neighbor";
if (/\s(\w+),/) {
print "the word was $1<br>";
}

$_ = "Hello there, neighbor";
if (/(\S+) (\S+), (\S+)/) {
print "words were $1 $2 $3<br>";
}
——————————–

のようなPerlプログラムの場合、
——————————–
the word was there
words were Hello there neighbor
——————————–

と、表示されます。