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