perl の挙動について

$today = "2012";
my @file = qw(
result_001_${today}.txt
result_002_${today}.txt
result_003_${today}.txt
);
for(@file){
print ;
}
例えば、こういったスクリプトがある場合、$todayが代入されることなく出力されます。
なぜか分かりますでしょうか？

No.2 ベストアンサー 回答者： Tacosan 回答日時： 2012/08/28 16:56

qw は実質的に

q + split
だから.

参考URL：http://perldoc.perl.org/perlop.html#Quote-and-Qu …

この回答へのお礼

とても参考になるHPの紹介ありがとうございます。
qwは単純に分割するだけと思っていたのですが、色々な使い方があることを初めて知りました！

お礼日時：2012/08/29 12:14

No.1 回答者： ymda 回答日時： 2012/08/28 16:46

代替コードとして

$today = "2012";
my @file = qq{
result_001_${today}.txt
result_002_${today}.txt
result_003_${today}.txt
};

for(@file){
print ;
}

ですと動きます。

おそらく
q で挟んだものは シングルクォート、qqで挟んだものはダブルクォートで挟んだものと同じですが
qwの場合は、単なる文字列として認識されるのではないかと考えられます。

この回答へのお礼

回答いただきありがとうございます。
qwの意味を全く考えずに使っていましたが、意味があったのですね。
また、サンプルプログラムありがとうございます。
とても役に立ちました。

お礼日時：2012/08/29 12:12