当前位置: 首页>>代码示例 >>用法及示例精选 >>正文


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。非经特殊声明,原始代码版权归原作者所有,本译文未经允许或授权,请勿转载或复制。