珀尔 |存在()函数

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

Syntax: exists(Expression)

Parameters:
Expression : This expression is either array or hash on which exists function is to be called.

Returns: 1 if the desired element is present in the given array or hash else returns 0.

示例 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存在”，因为索引超出了数组。

示例 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()函数将给定哈希的键作为参数，并检查它是否存在。