Perl each() 函数

当在List上下文中调用该函数时，该函数会返回一个双元素列表，其中包括哈希的下一个元素的键和值对，这样你就可以对其进行迭代。而在标量上下文中调用时，它只返回哈希的下一个元素的键。

语法： each MY_HASH

参数：

MY_HASH被作为参数传给该函数。

返回：

List上下文中的2个元素的键值对列表，而标量上下文中只返回键值。

例子1 :

#!/usr/bin/perl
  
# Initializing a Hash
%hash = (Geeks => 1, of => 2 , Geek => 3);
  
# each() function
while ((key,value) = each(%hash))
{
      
    # Printing(key, value) pair
    print("key =value\n");
}

输出。

Geek = 3
of = 2
Geeks = 1

例2:

#!/usr/bin/perl
  
# Initializing a Hash
%hash = (Geeks, of, Geek);
  
# each() function for scalar context
while ((key) = each(%hash))
{
      
    # Printing(key)
    print("key ");
}

输出。

Geek Geeks