文字列リスト演算子 - qw()
文字列のリストを簡潔に記述するための文字列リスト演算子と呼ばれる演算子があります。文字列リスト演算子を使用するとシングルクォートやカンマを記述することなく文字列のリストを表現できます。
qw(文字列1 文字列2 文字列3)
実際に文字列リスト演算子を使用した例です。
my @strings = qw/cat dog mouse/;
次の文字列のリストと同じ意味になります。
my @strings = ('cat', 'dog', 'mouse');
文字列を囲む記号には()以外の文字も使用することができます。
qw(cat dog mouse) qw/cat dog mouse/; qw{cat dog mouse} qw#cat dog mouse# qw[cat dog mouse] qw!cat dog mouse!
サンプルプログラム
文字列リスト演算子を使用したサンプルプログラムです。
use strict; use warnings; # 文字列リスト演算子 my @strings = qw/cat dog mouse/; # ('cat', 'dog', 'mouse') と同じ意味 print "1: 文字列リスト\n"; print join(',', @strings) . "\n";
参考:join関数
参考「Perlの配列」
Perlの「配列」についての解説は以下をご覧ください。