上一篇列出了Perl中定義數組，對象的方式與JS的異同。這里繼續補充數組，哈希的相關操作。
一、數組
可以對數組進行增刪，插入。與JS不同的是這些函數都是全局的，JS則是掛在Array.prototype上。
1，對數組尾部的操作pop（刪除最后的元素）、push（在尾部添加）
@goods = qw/pen pencil/;
pop(@goods); # @goods 變成 (pen)
push(@goods, 'brush'); # @goods 變為 (pen, brush)
在Perl中，函數調用時小括號是可選的（視上下文而定），就象前面使用的print。以下是等價的
pop @goods; # @goods 變成 pen
push @goods, 'brush'; # @goods 變為 (pen, brush)
2，對數組首部的操作shift（刪除第一個元素）、unshift（在首部添加元素）
3，任意位置刪除或插入splice
4，逆序數組，Perl有reverse函數，JS沒有對應函數。
5，排序數組sort，Perl和JS都有。
2，3，4，5提到的函數不貼演示代碼了。
6，JS使用length屬性獲取數組長度，Perl不同，有3種方式獲取
@goods = qw/pen pencil/;
# 將數組變量賦值給一個標量變量
$len = @goods;
# 使用scalar函數
$len = scalar(@goods);
# 最后一個元素的索引加1
$len = $#goods + 1;
7，遍歷數組，Perl用foreach函數
@goods = qw/pen pencil brush/;
# 默認的$_
foreach (@goods) {
print "$_"."\n";
}
# 自定義變量
foreach $item (@goods) {
print "$item"."\n";
}
ES5可以用forEach
['pen', 'pencil', 'brush'].forEach(function(item) {
console.log(item)
})
二、哈希
1，獲取keys和values
%person = (
name => 'Jack',
age => 30,
);
@k = keys %person; # (name, age)
@v = values $person; # ('Jack', 30)
ES5有Object.keys，但沒有Object.values
person = {
name: 'Jack',
age: 30
}
Object.keys(person) // ['name', 'age']
2，獲取鍵值對(key-value)數量（對Perl來說很容易）
%person = (
name => 'Jack',
age => 30,
);
$len = keys %person; # 2
對于JS來說，可能需要for in整個對象
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。
%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函數
%person = (
name => 'Jack',
age => 30,
);
if (exists $person{ndame}) {
print 'yes';
} else {
print 'no';
}
JS用in運算符。
5，刪除key，都用delete，但Perl是函數，JS是運算符
%person = (
name => 'Jack',
age => 30,
);
delete $person{'name'};
三、數組與哈希互換
Perl里哈希很容易就被轉成數組
%person = (
name => 'Jack',
age => 30,
);
@arr = %person; # 將哈希轉成數組 變成了('name', 'Jack', 'age', 30)
數組轉成哈希
@nums = qw/zero 0 one 1 two 2/;
%hash = @nums;
while( ($k, $v) = each %hash ) {
print "$k: $v\n";
}
打印如下
以上互換JS里沒有原生支持，需自行實現。
以上這篇Perl與JS的對比分析(數組、哈希)就是小編分享給大家的全部內容了，希望能給大家一個參考，也希望大家多多支持腳本之家。
您可能感興趣的文章:- Perl5和Perl6對比使用Sigils的差別
- Perl6中的垃圾收集
- 強大的Perl正則表達式實例詳解
- Perl中的符號 ->;、=>; 和 :: 分別表示什么意思？
- Perl中常見符號與操作
- Perl學習教程之單行命令詳解
- Perl時間處理函數用法介紹
- Perl字符串處理函數大全
- 詳解linux下批量替換文件內容的三種方法(perl,sed,shell)
- 使用Perl生成隨機密碼
- ASP.NET中HyperLink超鏈接控件的使用方法
- 將Perl5代碼遷移到Perl6上的解決方案
