perl pop push shift unshift實(shí)例介紹
更新時(shí)間：2013年02月09日 22:54:15 作者：
perl的pop跟push操作數(shù)組的最右邊，shift跟unshift操作數(shù)組的最左邊
學(xué)習(xí)記錄一下
#!/usr/bin/perl -w
use strict;
print '@a @b @c @d 的值都為1 2 3',"\n";
my @a = (1..3);
pop(@a);
print "\@a的值為@a,pop拿掉數(shù)組最右邊的值\n";
my @b = (1..3);
push(@b,'4');
print "\@b的值為@b,push添加一個(gè)值到數(shù)組的最右邊。\n";
my @c = (1..3);
shift@c;
print "\@c的值為@c,shift拿掉數(shù)組最左邊的一個(gè)值。\n";
my @d = (1..3);
unshift(@d,0);
print "\@d的值為@d,unshift添加一個(gè)值到數(shù)組的最左邊。\n";
[root@OTRS perl]# perl pop_push_shift_unshift.pl
@a @b @c @d 的值都為1 2 3
@a的值為1 2,pop拿掉數(shù)組最右邊的值
@b的值為1 2 3 4,push添加一個(gè)值到數(shù)組的最右邊。
@c的值為2 3,shift拿掉數(shù)組最左邊的一個(gè)值。
@d的值為0 1 2 3,unshift添加一個(gè)值到數(shù)組的最左邊。
復(fù)制代碼 代碼如下:
#!/usr/bin/perl -w
use strict;
print '@a @b @c @d 的值都為1 2 3',"\n";
my @a = (1..3);
pop(@a);
print "\@a的值為@a,pop拿掉數(shù)組最右邊的值\n";
my @b = (1..3);
push(@b,'4');
print "\@b的值為@b,push添加一個(gè)值到數(shù)組的最右邊。\n";
my @c = (1..3);
shift@c;
print "\@c的值為@c,shift拿掉數(shù)組最左邊的一個(gè)值。\n";
my @d = (1..3);
unshift(@d,0);
print "\@d的值為@d,unshift添加一個(gè)值到數(shù)組的最左邊。\n";
[root@OTRS perl]# perl pop_push_shift_unshift.pl
@a @b @c @d 的值都為1 2 3
@a的值為1 2,pop拿掉數(shù)組最右邊的值
@b的值為1 2 3 4,push添加一個(gè)值到數(shù)組的最右邊。
@c的值為2 3,shift拿掉數(shù)組最左邊的一個(gè)值。
@d的值為0 1 2 3,unshift添加一個(gè)值到數(shù)組的最左邊。
相關(guān)文章
perl從文件中讀取數(shù)據(jù)并輸出的實(shí)現(xiàn)代碼
perl從文件中讀取數(shù)據(jù)并輸出，附一個(gè)蛋白質(zhì)序列的讀取，有需要的朋友可以參考下2013-02-02
Perl語言入門學(xué)習(xí)指南及實(shí)用示例
Perl廣泛應(yīng)用于系統(tǒng)管理、Web開發(fā)、網(wǎng)絡(luò)編程和數(shù)據(jù)處理等領(lǐng)域,本文將帶您入門Perl語言,介紹其基本語法、常用功能及實(shí)用示例,感興趣的朋友跟隨小編一起看看吧2024-07-07
講Perl中的本地時(shí)間與UNIX時(shí)間戳間相互轉(zhuǎn)換的方法
這篇文章主要介紹了講Perl中的本地時(shí)間與UNIX時(shí)間戳間相互轉(zhuǎn)換的方法,主要用到了Perl中的Date::Parse模塊,需要的朋友可以參考下2015-06-06
這篇文章主要介紹了Perl中的子程序?qū)W習(xí)筆記,本文講解了子程序的定義、調(diào)用、返回值、局部變量、子程序參數(shù)傳遞等內(nèi)容,需要的朋友可以參考下2015-02-02
Perl進(jìn)行錯(cuò)誤處理和創(chuàng)建子程序的示例
這篇文章主要介紹了Perl進(jìn)行錯(cuò)誤處理和創(chuàng)建子程序的示例,Perl允許開發(fā)者編寫健壯的代碼,能夠優(yōu)雅地處理運(yùn)行時(shí)錯(cuò)誤和異常情況,需要的朋友可以參考下2024-06-06
這篇文章主要介紹了Perl中怎樣從數(shù)組中刪除某個(gè)值？本文講解如何把數(shù)組的元素賦值為undef,然后在從數(shù)組中刪除元素,需要的朋友可以參考下2015-06-06
本文為大家介紹Perl中處理時(shí)間的幾個(gè)函數(shù)，供大家學(xué)習(xí)參考2013-02-02
our 和 my 一樣，都是對(duì)變量的聲明，不過 our 聲明的是包全局變量，而 my 聲明的是詞法變量2013-02-02
perl控制流介紹(if條件，while,for循環(huán),foreach)
Perl控制流(if條件，while,for循環(huán))，需要的朋友可以參考下2013-02-02
這篇文章主要介紹了Perl中的模式匹配學(xué)習(xí)筆記,本文講解了匹配操作符、模式中的特殊字符、模式匹配選項(xiàng)等內(nèi)容,需要的朋友可以參考下2015-02-02