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。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。