Perl基礎(chǔ) 解析Perl標(biāo)量和數(shù)組概念
本文和大家重點討論一下Perl標(biāo)量和數(shù)組的概念,Perl有三種變量:Perl標(biāo)量、數(shù)組、哈希;而Perl數(shù)組是由一組連續(xù)的Perl標(biāo)量。
Perl讀書手記
一、Perl標(biāo)量
1、Perl有三種變量:Perl標(biāo)量、數(shù)組、哈希
2、字符相加不是用“+”號,而是用“.”
3、
- #!/usr/bin/Perl-w
- $num1="a";####“”是字符
- $num2="5";
- $num3=$num1x$num2;####$num1重復(fù)$num2次
- print"\$num3is$num3\n";
執(zhí)行結(jié)果:
[root@test-linuxtmp]#./pe.pl
$num3isaaaaa
[root@test-linuxtmp]#
4、Perl中字符串的比較操作和Shell中的數(shù)值測試運算相同,Perl中的數(shù)值比較操作就和Shell的字符串比較操作相同。
awk中“=”表示賦值“==”表示等于關(guān)系的判斷
二、Perl數(shù)組--數(shù)組是由一組連續(xù)的Perl標(biāo)量
1、Perl中使用@加上數(shù)組名來表示一個數(shù)組;Perl中的數(shù)組下標(biāo)是從“0”開始;Perl中的數(shù)組元素不必是同一數(shù)據(jù)類型
2、使用[]申請數(shù)組中第幾個元素
3、$name@name%name分別表示Perl標(biāo)量數(shù)組散列
4、push能夠把一些元素添加到數(shù)組尾部,而pop函數(shù)每次只能取走一個元素(是取走而不是復(fù)制)末理解的“堆棧數(shù)據(jù)結(jié)構(gòu)”
- [root@test-linuxtmp]#catpg.pl
- #!/usr/bin/Perl-w
- @list1=(1..4);
- @list2=("zero","one","two","three","four");
- push(@list1,@list2);
- $last=pop(@list1);
- print"\@list1is@list1\n";
- print"\@list2is@list2\n";
- print"\$lastis$last\n";
- [root@test-linuxtmp]#vipg.pl
- [root@test-linuxtmp]#./pg.pl
- @list1is1234zeroonetwothree
- @list2iszeroonetwothreefour
- $lastisfour
- [root@test-linuxtmp]#
5、unshift函數(shù)是在數(shù)組的頭部插入一個或者是一些新的元素;shift是從數(shù)組的頭部移走一個元素,整個數(shù)組看起來像是向左移動了一個位置。
- #!/usr/bin/Perl-w
- @list1=(0..4);
- @list2=("zero","one","two","three","four");
- unshift(@list1,@list2);###是將數(shù)組list2插入到數(shù)組list1
- $last=shift(@list1);
- print"\@list1is@list1\n\@list2is@list2\n\$lastis$last\n";
- [root@test-linuxtmp]#./ph.pl
- @list1isonetwothreefour01234
- @list2iszeroonetwothreefour
- $lastiszero
- [root@test-linuxtmp]#
6、reverse函數(shù)的功能是顛倒數(shù)組,它可以把數(shù)組元素的順序頭尾顛倒。
- [root@test-linuxtmp]#catpi.pl
- #!/usr/bin/Perl-w
- @list1=(0..4);
- print"\@list1is@list1\n";
- @list1=reverse(@list1);
- print"\@list1reverseis@list1\n";
- [root@test-linuxtmp]#./pi.pl
- @list1is01234
- @list1reverseis43210
- [root@test-linuxtmp]#
7、哈希
哈希變量和數(shù)組非常類似,都可以存放多個Perl標(biāo)量,每個Perl標(biāo)量可以通過索引單獨存取。不同的是哈希變量的索引不是數(shù)組的下標(biāo),而是另一個Perl標(biāo)量。通常這個Perl標(biāo)量被稱作key,通過key,我們就可以訪問
到其對應(yīng)的數(shù)據(jù)。另一點的不同是哈希變量中的元素沒有先后之分,是無序的,key是能夠訪問它們的惟一通道。Perl中使用百分號“%”來表示一個哈希變量。
為以下內(nèi)容
- [root@test-linuxtmp]#catpl.pl
- #!/usr/bin/Perl-w
- $area{'beijing'}=9;
- $area{'shanghai'}=8;
- print"$area{'beijing'}\n"
- %areab=('hebei'=>5,'handan'=>4);
- print"\$areabhebeiis$areab{'hebei'}\n";
- print"\$areabhandanis$areab{'handan'}\n"
- [root@test-linuxtmp]#
執(zhí)行錯誤
- [root@test-linuxtmp]#./pl.pl
- Unquotedstring"areab"mayclashwithfuturereservedwordat./pl.plline5.
- Operatororsemicolonmissingbefore%areabat./pl.plline5.
- Ambiguoususeof%resolvedasoperator%at./pl.plline5.
- Can'tmodifymodulus(%)inscalarassignmentat./pl.plline5,near");"
- Executionof./pl.plabortedduetocompilationerrors.
但將2到4行注釋掉可以成功執(zhí)行。原因不清楚
[root@test-linuxtmp]#catpt.pl
#!/usr/bin/Perl-w
%area=(1,"a",2,"b");
print"\%areais1$area{1}\n";
【編輯推薦】