[精讚] [會員登入]
155

關於Perl,你得知道這幾點

Perl 有不少奇異的地方,值得看一看

此文完整連結 http://n.sfs.tw/13011

複製連結 關於Perl,你得知道這幾點 @新精讚
(文章歡迎轉載,務必尊重版權註明連結來源)
2019-01-18 11:11:10 最後編修
2019-01-07 13:25:44 By 張○○
 

Perl 有不少奇異的地方

沒有 switch 元件

  Perl 沒有switch,perl 如果要達到 switch 的功能,就必須裝一些額外的模組。

  如果不想裝,就得用一堆 if-elsif- ....-elsif-else 來取代。這裡的 elsif 常是初學者會打錯的地方,因為他拚作 elsif [正] 而不是 elseif [誤]。

 

正規表達式不太一樣

  Perl 的正規表達式Regular Express(regex) 和別人不太一樣,有些是屬於PERL獨有的,這也是perl的強項:對文件檔案和字串的處理能力。

PERL的 regex 非常精采,此外, perl 多了一個 =~ 的運算符,這是別的語言沒有的東西,也是很多初學者的障礙。

 

迴圈中的元素是動態的

容許foreach 迴圈中動態加值進去,非常特別,例如以PHP作對比範例。

[PHP]

$arr= array("black","gray","white");
$ii=0;
foreach($arr as $item){
    if($ii==0){ array_push($arr,"yellow", "pink", "red"); }
    print $item;  
    $ii++;
}
print_r( $arr);

第4行 迴圈中,在一開始時在陣列尾端加入項目"yellow", "pink", "red"

第5行 分別印出black gray white,但在迴圈中加入的"yellow", "pink", "red" 沒有印出

第8行 確認陣列的確是完整個6個項目

Array
(
    [0] => black
    [1] => gray
    [2] => white
    [3] => yellow
    [4] => pink
    [5] => red
)

 

同樣的例子寫在 Perl 就不一樣,來看看:

[PERL]

my @arr = qw(black gray white);
my $ii=0;
foreach(@arr){
    push(@arr,("yellow", "pink", "red")) if $ii==0;
    print $_."\n";
    $ii++;
}

雖然項目"yellow", "pink", "red"是在迴圈中被加入,還是會當成是迴圈陣列的一部分,第5行印出完整個六個項目:

black
gray
white
yellow
pink
red

在迴圈中被加入的項目,並且影響迴圈項目個數

換句話說,這樣子寫程式會變成無窮迴圈:

my @arr = qw(black gray white);
foreach(@arr){
    push(@arr,"green");
    print $_."\n";
}

 

特殊字元和省略符號相當多

perl 的特殊字元大概有2 30個,常是初學者的障礙,就算是老手,有時要看這些特殊字元和省略符一堆的程式碼,也會看得一個頭兩個大;以我的經驗,大概自己寫的過一陣子不用太久,就會忘記自己寫什麼鬼了。

 

沒有真和假的BOOLEAN值

你不能設定變數為true或false,例如你不能設定 $a=true;

 

迴圈中沒有 break 的指令

取而代之是 last。舊版本的 last 並不是像break 立刻跳出迴圈,而是把迴圈的指標設為最後。

新版本的perl改善這個問題。

 

大括號完全不能省

一行運算式還是要大括號,頗煩的~~

例如 if(...){ 一行內容; } 這個大括號不能省。

 

沒有 /*..... */ 註解

可以包圍一個範圍的註解不存在,要註解一段的話,只能一行一行加 ''#'

 


編修原文 2009-11-19 02:38:02

你可能感興趣的文章

[PERL] 11- 雜湊的範例 Perl 的幾個雜湊範例

[PERL] 21- 使用資料庫 Perl 連Mysql

[PERL] 01-撰寫第一隻PERL程式 PERL的系列教學文,適合有其他程式經驗但沒學過PERL的人

[PERL] 05-運算子 #1 PERL的運算子介紹,總共有21種

[PERL] 16-字串取代和置換 Perl 字串比對及置換

[PERL] 13- 變數的視界 Perl 的副程式就是所謂的函數

PERL 正規表達式會用到的符號 PERL在比對時常常會用到符號整理

[PERL] 自寫 trim, ltrim, rtrim 函數 常用的 perl 函數中沒有trim, ltrim, rtrim這三個函數,那就自己來寫,非常容易

[PERL] Regex 字元集(群組) 幾個Perl在regular express會用到的特殊符號notation:字元集

[PERL] 前置if和後置if (if修飾子)的差別 perl的if可以拿來作為後置修飾子使用,此外還有一個unless像是if的相反,分析他們的差異

我有話要說


限制:留言最高字數1000字,超過部分會被截掉。請注意:留言不可帶有網址,會被濾掉。 限制:未登入訪客,每則留言間隔需超過10分鐘,每日最多5則留言。

訪客留言

[無留言]

隨機好文

SELinux 常用指令和檔案 在Redhat系列中,Centos5以後加入了selinux,他並沒有這麼可怕,不必每次看到Selinux ,就想把他

看懂DSUB DVI HDMI USB等各式影音接頭 看懂DSUB DVI HDMI等各式影音接頭

[Wildfly10] 發佈war檔 deploy war file onto wildfly10

[NetBeans] 使用git複製別人的專案 NetBeans使用git複製別人的專案及版本控制

維修海棉拖把頭 這類型的海棉拖把很好用,可是這近發現海棉頭越來越不耐用,也許是錯覺,以往都能用個三四個月,現在二個月就差不多掉下來。 這