上一篇列出了Perl中定義數(shù)組，對象的方式與JS的異同。這里繼續(xù)補充數(shù)組，哈希的相關(guān)操作。
一、數(shù)組
可以對數(shù)組進行增刪，插入。與JS不同的是這些函數(shù)都是全局的，JS則是掛在Array.prototype上。
1，對數(shù)組尾部的操作pop（刪除最后的元素）、push（在尾部添加）
|
1
2
3
|
@goods = qw/pen pencil/; pop(@goods); # @goods 變成 (pen) push(@goods, 'brush'); # @goods 變?yōu)?(pen, brush) |
在Perl中，函數(shù)調(diào)用時小括號是可選的（視上下文而定），就象前面使用的print。以下是等價的
|
1
2
|
pop @goods; # @goods 變成 pen push @goods, 'brush'; # @goods 變?yōu)?(pen, brush) |
2，對數(shù)組首部的操作shift（刪除第一個元素）、unshift（在首部添加元素）
3，任意位置刪除或插入splice
4，逆序數(shù)組，Perl有reverse函數(shù)，JS沒有對應函數(shù)。
5，排序數(shù)組sort，Perl和JS都有。
2，3，4，5提到的函數(shù)不貼演示代碼了。
6，JS使用length屬性獲取數(shù)組長度，Perl不同，有3種方式獲取
|
1
2
3
4
5
6
7
8
9
10
|
@goods = qw/pen pencil/; # 將數(shù)組變量賦值給一個標量變量 $len = @goods; # 使用scalar函數(shù) $len = scalar(@goods); # 最后一個元素的索引加1 $len = $#goods + 1; |
7，遍歷數(shù)組，Perl用foreach函數(shù)
|
1
2
3
4
5
6
7
8
9
10
11
|
@goods = qw/pen pencil brush/; # 默認的$_ foreach (@goods) { print "$_"."\n"; } # 自定義變量 foreach $item (@goods) { print "$item"."\n"; } |
ES5可以用forEach
|
1
2
3
|
['pen', 'pencil', 'brush'].forEach(function(item) { console.log(item) }) |
二、哈希
1，獲取keys和values
|
1
2
3
4
5
6
|
%person = ( name => 'Jack', age => 30, ); @k = keys %person; # (name, age) @v = values $person; # ('Jack', 30) |
ES5有Object.keys，但沒有Object.values
|
1
2
3
4
5
|
person = { name: 'Jack', age: 30 } Object.keys(person) // ['name', 'age'] |
2，獲取鍵值對(key-value)數(shù)量（對Perl來說很容易）
|
1
2
3
4
5
|
%person = ( name => 'Jack', age => 30, ); $len = keys %person; # 2 |
對于JS來說，可能需要for in整個對象
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
function getObjLen(obj) { var len = 0 for (var a in obj) { if (obj.hasOwnProperty(a)) len++ } return len } var person = { name: 'Jack', age: 30 } getObjLen(person) // 2 |
3，遍歷對象
Perl有兩種方式，一種while+each，一種獲取keys再foreach。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
%person = ( name => 'Jack', age => 30, ); # 方式1 while ( ($k, $v) = each %person ) { print "$k: $v"."\n"; } # 方式2 @keys = keys %person; foreach(@keys) { print "$_: ".$person{$_}."\n"; } |
JS一個for in即可。
4，判斷某個key是否存在，Perl用exists函數(shù)
|
1
2
3
4
5
6
7
8
9
|
%person = ( name => 'Jack', age => 30, ); if (exists $person{ndame}) { print 'yes'; } else { print 'no'; } |
JS用in運算符。
5，刪除key，都用delete，但Perl是函數(shù)，JS是運算符
|
1
2
3
4
5
|
%person = ( name => 'Jack', age => 30, ); delete $person{'name'}; |
三、數(shù)組與哈希互換
Perl里哈希很容易就被轉(zhuǎn)成數(shù)組
|
1
2
3
4
5
|
%person = ( name => 'Jack', age => 30, ); @arr = %person; # 將哈希轉(zhuǎn)成數(shù)組 變成了('name', 'Jack', 'age', 30) |
數(shù)組轉(zhuǎn)成哈希
|
1
2
3
4
5
|
@nums = qw/zero 0 one 1 two 2/; %hash = @nums; while( ($k, $v) = each %hash ) { print "$k: $v\n"; } |
打印如下
以上互換JS里沒有原生支持，需自行實現(xiàn)。
以上這篇Perl與JS的對比分析(數(shù)組、哈希)就是小編分享給大家的全部內(nèi)容了，希望能給大家一個參考，也希望大家多多支持服務器之家。
