Perlで $_[1] =~ /^\$1\$/ が理解できません。

[上に] [前に] [次に]
ラウォッチ [E-Mail] [HomePage] 2000/01/28(金) 13:31:45
ある掲示板のスクリプトで、以下の意味がわかりません。よろしくお願い致します。

if ($_[1] =~ /^\$1\$/) { $key = 3; } else { $key = 0; }

$_[1]はこの関数の第二引数です。

saka 2000/01/28(金) 13:58:07
正規表現なので
^
行の先頭に
$1$
と言う文字列がある行と言う事でしょう。
多分有っていると思うけど。

ラウォッチ 2000/01/28(金) 14:10:36
納得できました。
$1に惑わされました。

sakaさん、ありがとうございました。

ラウォッチ 2000/01/28(金) 15:02:21
[[解決]]
解決!

[上に] [前に] [次に]