Perl與JS的對比分析(數(shù)組、哈希)
上一篇列出了Perl中定義數(shù)組，對象的方式與JS的異同。這里繼續(xù)補(bǔ)充數(shù)組，哈希的相關(guān)操作。
一、數(shù)組
可以對數(shù)組進(jìn)行增刪，插入。與JS不同的是這些函數(shù)都是全局的，JS則是掛在Array.prototype上。
1，對數(shù)組尾部的操作pop（刪除最后的元素）、push（在尾部添加）
@goods = qw/pen pencil/; pop(@goods); # @goods 變成 (pen) push(@goods, 'brush'); # @goods 變?yōu)?(pen, brush)
在Perl中，函數(shù)調(diào)用時(shí)小括號是可選的（視上下文而定），就象前面使用的print。以下是等價(jià)的
pop @goods; # @goods 變成 pen push @goods, 'brush'; # @goods 變?yōu)?(pen, brush)
2，對數(shù)組首部的操作shift（刪除第一個(gè)元素）、unshift（在首部添加元素）
3，任意位置刪除或插入splice
4，逆序數(shù)組，Perl有reverse函數(shù)，JS沒有對應(yīng)函數(shù)。
5，排序數(shù)組sort，Perl和JS都有。
2，3，4，5提到的函數(shù)不貼演示代碼了。
6，JS使用length屬性獲取數(shù)組長度，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，但沒有Object.values
person = {
name: 'Jack',
age: 30
}
Object.keys(person) // ['name', 'age']
2，獲取鍵值對(key-value)數(shù)量（對Perl來說很容易）
%person = ( name => 'Jack', age => 30, ); $len = keys %person; # 2
對于JS來說，可能需要for in整個(gè)對象
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一個(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ù)組與哈?；Q
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里沒有原生支持，需自行實(shí)現(xiàn)。
以上這篇Perl與JS的對比分析(數(shù)組、哈希)就是小編分享給大家的全部內(nèi)容了，希望能給大家一個(gè)參考，也希望大家多多支持腳本之家。
相關(guān)文章
有關(guān)perl文件操作的一些例子，供大家學(xué)習(xí)參考2013-02-02
這篇文章主要介紹了Perl函數(shù)(子程序)學(xué)習(xí)筆記,本文講解了函數(shù)定義、函數(shù)返回值、函數(shù)參數(shù)傳遞等內(nèi)容,需要的朋友可以參考下2014-11-11
有關(guān)perl引用的相關(guān)知識，有需要的朋友可以參考下2013-02-02
上一篇文章介紹了hash的入門教程，這篇文章為大家提供一個(gè)實(shí)例，方便大家深入學(xué)習(xí)2013-02-02
perl處理xml的模塊介紹，需要的朋友可以參考下2013-02-02
Deparse 模塊是一個(gè)很好的打印機(jī)，它可以揭開 Perl 代碼神秘的面紗，幫助你理解優(yōu)化器為你的代碼做了那些轉(zhuǎn)換。換言之，它會重新生成Perl代碼，試著略去一些晦澀難懂的部分，把代碼用一致的格式寫出來2013-03-03
這篇文章主要介紹了Perl中常見符號與操作,需要的朋友可以參考下2017-10-10
Perl 社區(qū)并不是所有的東西都發(fā)布在 CPAN 上。甚至專門有一個(gè) Module::ThirdParty 模塊記錄這些非 CPAN 的 perl 項(xiàng)目列表。其中最有名的應(yīng)該就屬寫博客的 Movable Type 和做監(jiān)控的 SmokePing 了2013-02-02
在vim中添加perl注釋時(shí)無法對齊問題的解決方法
在使用vim編輯perl腳本時(shí)，每當(dāng)輸入#號時(shí)，#號都會跑到行首問題，需要的朋友可以參考下2013-02-02
perl下獲取命令行的參數(shù)跟數(shù)量的函數(shù)。2009-04-04