Perl qw()函数

前端之家收集整理的这篇文章主要介绍了Perl qw()函数前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

语法

qw EXPR


定义和用法

qw()是用来指定了很多小单引号的句字是一个快速方法。例如,qw(foo bar baz) 相当于 ('foo','bar','baz')。一些程序员认为,使用qw使Perl脚本更容易阅读。实际上,你可以使用任何分隔符,而不仅仅是括号组。

简单地,可以使用qw()准备一个数组,如以下所示的例示的。

返回值

  • 列表元素的列表组成的计算,如果他们是单引号。

例子

试试下面的例子:

#!/usr/bin/perl -w
#by www.yiibai.com

@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

猜你在找的Perl相关文章