Perl qw用法及代碼示例

描述

這個函數是指定很多小 single-quoted 字的快捷方式。例如，qw(foo bar baz) 等價於 ('foo', 'bar', 'baz')。一些程序員認為使用 qw 使 Perl 腳本更易於閱讀。您實際上可以使用任何一組定界符，而不僅僅是括號。

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

用法

以下是此函數的簡單語法 -

qw EXPR

返回值

此函數返回一個列表，該列表由 LIST 的元素組成，就好像它們是 single-quoted 一樣。

示例

以下是顯示其基本用法的示例代碼 -

#!/usr/bin/perl -w

@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