Perl Array pop()用法及代碼示例

Perl中的pop()函數返回作為參數傳遞給它的Array的最後一個元素，從數組中刪除該值。請注意，傳遞給它的值必須顯式為數組，而不是列表。

用法：

pop(Array)

返回值：
如果列表為空，則為undef，否則為數組中的最後一個元素。

範例1：

#!/usr/bin/perl -w 
  
# Defining an array of integers 
@array = (10, 20, 30, 40); 
  
# Calling the pop function 
$popped_element = pop(@array); 
  
# Printing the Popped element 
print "Popped element is $popped_element"; 
  
# Printing the resultant array 
print "\nResultant array after pop():\n@array";

輸出：

Popped element is 40
Resultant array after pop():
10 20 30

範例2：

#!/usr/bin/perl -w 
  
# Defining an array of strings 
@array = ("Geeks", "For", "Geeks", "Best"); 
  
# Calling the pop function 
$popped_element = pop(@array); 
  
# Printing the Popped element 
print "Popped element is $popped_element"; 
  
# Printing the resultant array 
print "\nResultant array after pop():\n@array";

輸出：

Popped element is Best
Resultant array after pop():
Geeks For Geeks

相關用法

注：本文由純淨天空篩選整理自Code_Mech大神的英文原創作品 Perl | Array pop() Function。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。