／ ［ 【 の文字をマッチさせるには？

質問

／　［　【　の文字をマッチさせるには？
環境　perl　version 5.005_03

while($line = <IN>){
if($line =~ /／/){
（マッチした場合の処理）
}
}

などとしたいのですが、／　［　【　の文字にマッチさせるには
どのように記述したらいいのでしょうか？
上記のように普通に指定するとマッチしませんでした。

よろしくお願いします。

回答No.2

ipe077

私の環境ではマッチしましたよ．

$str="今日のおかずは味噌汁／煮付け";

if($str=~m/／/){
print "マッチしました\n";
}

まずは，文字コードをeucにして保存しなおしたあと，もう一度実行してみて動くかどうか試してください．それでもうまくいかない場合は，どの文字列でマッチングしたら失敗したのか具体的に教えてください

回答No.1

moon_piyo

こんにちは

(1) \Q～\Eでくくる
if ($line =~ /(\Q／\E|\Q［\E|\Q【\E)/) {
}

(2) 正規表現は忘れてindex()を利用してみる
if (index($line, "／") > -1 ||index($line, "［") > -1 ||index($line, "【") > -1) {
}