Perl exists()用法及代码示例

Perl中的exists()函数用于检查给定数组或哈希中的元素是否存在。如果所需元素存在于给定数组中，则此函数返回1；否则，哈希返回0。

用法： exists(Expression)

参数：
Expression :该表达式可以是要在其上调用存在函数的数组或哈希。

返回值：如果所需元素存在于给定数组或哈希中，则返回1。

示例1:本示例在数组上使用exists()函数。

#!/usr/bin/perl  
  
# Initialising an array 
@Array = (10, 20, 30, 40, 50); 
  
# Calling the for() loop over 
# each element of the Array 
# using index of the elements 
for ($i = 0; $i < 10; $i++) 
{ 
      
    # Calling the exists() function 
    # using index of the array elements 
    # as the parameter 
    if(exists($Array[$i])) 
    { 
        print "Exists\n"; 
    } 
    else
    { 
        print "Not Exists\n"
    } 
}

输出：

Exists
Exists
Exists
Exists
Exists
Not Exists
Not Exists
Not Exists
Not Exists
Not Exists

在上面的代码中，可以看到exists()函数的参数是给定数组的每个元素的索引，因此直到索引4(索引从0开始)，它都以“Exists”的形式提供输出，后来又以“Not Exists”的形式提供输出，因为索引脱离了数组。

示例2:本示例在哈希上使用exists()函数。

#!/usr/bin/perl  
  
# Initialising a Hash 
%Hash = (Mumbai => 1, Kolkata => 2, Delhi => 3); 
  
# Calling the exists() function 
if(exists($Hash{Mumbai})) 
{ 
    print "Exists\n"; 
} 
else
{ 
    print "Not Exists\n"
} 
  
# Calling the exists() function 
# with different parameter 
if(exists($Hash{patna})) 
{ 
    print "Exists\n"; 
} 
else
{ 
    print "Not Exists\n"
}

输出：

Exists
Not Exists

在上面的代码中，exists()函数将给定哈希的键作为参数，并检查它是否存在。

相关用法

注：本文由纯净天空筛选整理自Kanchan_Ray大神的英文原创作品 Perl | exists() Function。非经特殊声明，原始代码版权归原作者所有，本译文未经允许或授权，请勿转载或复制。