当前位置：极客教程 > Perl > Perl 教程 > Perl 数组 (push、pop、shift、unshift)

Perl 数组 (push、pop、shift、unshift)

Perl 数组 (push、pop、shift、unshift)

Perl提供了各种内置的函数来添加和删除数组中的元素。

函数 描述
push 在数组的末尾插入列表中的值
pop 移除一个数组的最后一个值
shift 将一个数组的所有值向左移动
unshift 将列表中的元素添加到数组的前面

push函数

该函数将列表中给定的值插入到数组的末端。多个值可以用逗号分隔插入。这个函数增加一个数组的大小。它返回新数组中元素的数量。

语法： push(Array, list)

例子:

#!/usr/bin/perl
 
# Initializing the array
@x = ('Java', 'C', 'C++');
 
# Print the Initial array
print "Original array: @x \n";
 
# Pushing multiple values in the array
push(@x, 'Python', 'Perl');
 
# Printing the array
print "Updated array: @x";
Perl

输出：

Original array: Java C C++ 
Updated array: Java C C++ Python Perl
Perl

pop函数

该函数用于移除数组中的最后一个元素。在执行pop函数后，数组的大小被递减一个元素。如果列表为空，该函数返回undef，否则返回数组的最后一个元素。

语法： pop(Array)

例子:

#!/usr/bin/perl
 
# Initializing the array
@x = ('Java', 'C', 'C++');
 
# Print the Initial array
print "Original array: @x \n";
 
# Prints the value returned by pop
print "Value returned by pop: ", pop(@x);
 
# Prints the array after pop operation
print "\nUpdated array: @x";
Perl

输出：

Original array: Java C C++ 
Value returned by pop: C++
Updated array: Java C
Perl

shift函数

该函数返回一个数组中的第一个值，将其删除，并将数组列表中的元素向左移动一个。移位操作和pop操作一样，都是从数组的起点开始移位，而不是像pop那样从终点开始。如果数组为空，该函数返回undef，否则返回数组的第一个元素。

语法： shift(Array)

示例：

#!/usr/bin/perl
 
# Initializing the array
@x = ('Java', 'C', 'C++');
 
# Print the Initial array
print "Original array: @x \n";
 
# Prints the value returned
# by shift function
print "Value returned by shift: ",
                        shift(@x);
 
# Array after shift operation
print "\nUpdated array: @x";
Perl

输出：

Original array: Java C C++ 
Value returned by shift :Java
Updated array: C C++
Perl

unshift函数

该函数将给定的元素列表放在一个数组的开头。从而将一个数组中的所有数值向右移动。多个数值可以通过这个操作来取消移位。该函数返回一个数组中新元素的数量。

语法： unshift(Array, List)

例子:

#!/usr/bin/perl
 
# Initializing the array
@x = ('Java', 'C', 'C++');
 
# Print the Initial array
print "Original array: @x \n";
 
# Prints the number of elements
# returned by unshift
print "No of elements returned by unshift: ",
                   unshift(@x, 'PHP', 'JSP');
 
# Array after unshift operation
print "\nUpdated array: @x";
Perl

输出：

Original array: Java C C++ 
No of elements returned by unshift :5
Updated array: PHP JSP Java C C++
Perl

Python教程

Python 教程

Python 教程
Tkinter 教程

Tkinter 教程
Pandas 教程

Pandas 教程
NumPy 教程

NumPy 教程
Flask 教程

Flask 教程
Django 教程

Django 教程
PySpark 教程

PySpark 教程
wxPython 教程

wxPython 教程
SymPy 教程

SymPy 教程
Seaborn 教程

Seaborn 教程
SciPy 教程

SciPy 教程
RxPY 教程

RxPY 教程
Pycharm 教程

Pycharm 教程
Pygame 教程

Pygame 教程
PyGTK 教程

PyGTK 教程
PyQt 教程

PyQt 教程
PyQt5 教程

PyQt5 教程
PyTorch 教程

PyTorch 教程
Matplotlib 教程

Matplotlib 教程
Web2py 教程

Web2py 教程
BeautifulSoup 教程

BeautifulSoup 教程

Java教程

Java 教程

Java 教程

Web教程

HTML 教程

HTML 教程
CSS 教程

CSS 教程
CSS3 教程

CSS3 教程
jQuery 教程

jQuery 教程
Ajax 教程

Ajax 教程
AngularJS 教程

AngularJS 教程
TypeScript 教程

TypeScript 教程
WordPress 教程

WordPress 教程
Laravel 教程

Laravel 教程
Next.js 教程

Next.js 教程
PhantomJS 教程

PhantomJS 教程
Three.js 教程

Three.js 教程
Underscore.JS 教程

Underscore.JS 教程
WebGL 教程

WebGL 教程
WebRTC 教程

WebRTC 教程
VueJS 教程

VueJS 教程

数据库教程

SQL 教程

SQL 教程
MySQL 教程

MySQL 教程
MongoDB 教程

MongoDB 教程
PostgreSQL 教程

PostgreSQL 教程
SQLite 教程

SQLite 教程
Redis 教程

Redis 教程
MariaDB 教程

MariaDB 教程

图形图像教程

Vulkan 教程

Vulkan 教程
OpenCV 教程

OpenCV 教程

大数据教程

R语言 教程

R语言 教程

开发工具教程

Git 教程

Git 教程
VSCode 教程

VSCode 教程
Docker 教程

Docker 教程
Gerrit 教程

Gerrit 教程
Excel 教程

Excel 教程

计算机教程

Go语言 教程

Go语言 教程
C++ 教程

C++ 教程

Perl 教程

登录

找回密码？

注册