最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

perl pop push shift unshift實(shí)例介紹

 更新時間:2013年02月09日 22:54:15   作者:  
perl的pop跟push操作數(shù)組的最右邊,shift跟unshift操作數(shù)組的最左邊
學(xué)習(xí)記錄一下
復(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添加一個值到數(shù)組的最右邊。\n";
my @c = (1..3);
shift@c;
print "\@c的值為@c,shift拿掉數(shù)組最左邊的一個值。\n";
my @d = (1..3);
unshift(@d,0);
print "\@d的值為@d,unshift添加一個值到數(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添加一個值到數(shù)組的最右邊。
@c的值為2 3,shift拿掉數(shù)組最左邊的一個值。
@d的值為0 1 2 3,unshift添加一個值到數(shù)組的最左邊。

相關(guān)文章

最新評論

大荔县| 西华县| 定远县| 揭东县| 天镇县| 东明县| 炉霍县| 昭苏县| 龙川县| 沽源县| 通许县| 望城县| 洞口县| 岑溪市| 万宁市| 谷城县| 唐河县| 肇源县| 北票市| 英超| 恭城| 雷州市| 日照市| 扎兰屯市| 锦州市| 张北县| 长沙县| 新民市| 石嘴山市| 灵宝市| 阿克苏市| 小金县| 乌拉特中旗| 和平区| 田林县| 苗栗市| 旺苍县| 杭锦后旗| 仪陇县| 七台河市| 梁河县|