TOP - Perl - 特殊変数 - $`

直前のパターンマッチの際にマッチした部分より前にある文字列が格納されます。

(例1)
$_ = "東京都北区赤羽";

if (/赤.*/)
{
    print "$`\n";          # 直前に成功した/赤.*/の結果の前の文字列が表示される
}
実行結果
東京都北区

(例2)
$_ = "東京都北区赤羽";

if (/北.*/)
{
    if (/赤.*/)
    {
        print "$`\n";   # 直前に成功した/赤.*/の結果の前の文字列が表示される
    }
}

print "$`\n";           # 直前に実行された結果は/赤.*/の結果となるが、ブロックが一段内側になるため表示されない
実行結果
東京都北区
東京都


Copyright(C) 2006-2011 CLAYPOT. All Rights Reserved.