Perl qw()函數

perl qw()函數例子，qw()函數實例代碼 - 是用來指定了很多小單引號的句字是一個快速的方法。

語法

qw EXPR

定義和用法

qw()是用來指定了很多小單引號的句字是一個快速的方法。例如，qw(foo bar baz) 相當於 ('foo', 'bar', 'baz')。一些程序員認為，使用qw使Perl腳本更容易閱讀。實際上，你可以使用任何分隔符，而不僅僅是括號組。

簡單地，可以使用qw()準備一個數組，如以下所示的例示的。

返回值

• 列表元素的列表組成的計算，如果他們是單引號。

例子

試試下麵的例子：

#!/usr/bin/perl -w
#by www.gitbook.net

@array = qw(This is a list of words without interpolation);

foreach $key (@array){
   print"Key is $key\n";
}

這將產生以下結果：

Key is This
Key is is
Key is a
Key is list
Key is of
Key is words
Key is without
Key is interpolation