珀尔 | qw 运算符

Perl 中的 qw运算符用于提取给定字符串的每个元素，因为它位于单引号 ( ' ' ) 中的元素数组中。
这个函数代表引用词，因为它认为给定字符串的每个词都被引用，就像 qw(Geeks for Geeks) 等价于 ('Geeks', 'for', 'Geeks')。
这个 qw() 使用括号，所以它看起来像是一个函数，但它不是。它使用不同类型的分隔符，如下所示：

@String = qw/Ram is a boy/;
@String = qw{Geeks for Geeks};
@String = qw[Geeks for Geeks];
@String = qw'Geeks for Geeks';
@String = qw"Geeks for Geeks";
@String = qw!Geeks for Geeks!;
@String = qw@Geeks for Geeks@;

Syntax: qw(String)

Parameters:
String : It is the input string whose each element is extracted.

Returns: each element of the given string as it is an array of elements in single-quote (”).

示例 1：

#!/usr/bin/perl
  
# Initialising a String as the parameter of qw
# operator whose each element is extracted.
@String = qw(GfG is a computer science portal);
foreach $key (@String) {
   print"Element is: $key\n";
}

输出：

Element is: GfG
Element is: is
Element is: a
Element is: computer
Element is: science
Element is: portal

示例 2：

#!/usr/bin/perl
  
# Initialising a String as the parameter of qw
# operator whose each element is extracted.
@String = qw(Delhi Mumbai Kolkata Patna);
foreach $key (@String) {
   print"City name is: $key\n";
}

输出 ：

City name is: Delhi
City name is: Mumbai
City name is: Kolkata
City name is: Patna

注意： qw运算符读取一个空白并提取空白前后的元素。