Perl qw 函数

  • 描述

    qw 此函数是指定许多小的单引号单词的快速方法。例如,qw(foo bar baz)等效于('foo','bar','baz')。一些程序员认为使用qw使Perl脚本更易于阅读。实际上,您可以使用任何一组定界符,而不仅仅是括号。只需使用 qw() 即可准备一个数组,如下例所示。
  • 句法

    以下是此函数的简单语法-
    
    qw EXPR
    
  • 返回值

    此函数返回一个列表,该列表由被评估的LIST元素组成,就好像它们是单引号一样。
  • 示例

    以下是显示其基本用法的示例代码-
     
    @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