Perl的Hello World
Perl的原文:
perl是”Practical Extraction and Report Language”(實用性萃取及報表語言)
Perl的目的:
對程式設計師來說,常會遇到許多工作,雖然看似平常,但卻很難用 c 或其它unix常用語言寫程式解決。要不然,就是本身不適合用shell,或在可攜性上大有問題。協助程式設計師解決這樣的問題,就是Perl的設計理念。
Perl的第一行程式:
Explain | Hello,World |
第一行表是它是個Perl程式 這裡我們用了-w,此時perl會對任何可能發生的潛在危險發出警告訊息 | #! /usr/bin/perl/ -w print (“Hello,world!\n”); (\n是換行符號) 有時print和其它函式會用「有括號」的方式呼叫,有時沒有。其實規則很簡單:在perl裡,所有的內建函式呼叫時都不需括號。有些甚至禁用;因此,你可以看情況決定要不要用。 |
Perl的執行過程:
當執行這段程式時,kernel會先載入perl解譯器,對整個程式(包括第一行註解)進行語意分析,然後執行編譯過的機器碼。之後,perl行程(process)會結束,並傳給shell成功執行的返回值。
怎麼來執行perl?
在現行的unix的系統下,幾乎都有perl的直譯器。在目錄下打 ./xxx (檔名)就可以執行了。
以下是另一段程式: Q:純量變數(scalar variable)=>是存放數值的方法之一。
Explain | 詢問並記憶結果 |
發出詢問的方法,就是利用print這個函式,在這裡,我們加入新的敘述。 <STDIN>,抓入整行的輸入資料,將其值設給$name變數 chomp這個函式可以消除純量變數內的換行字完 | #! /usr/bin/perl -w print “What is your name? ” ; $name = <STDIN>; chomp($name); print “Hello, $name!\n” ; (若想印出”$”,在前面加上反斜線就好) |
加入選擇 | |
現在假設,我們給Randal一點不一樣的問候語,而其他訪客仍看到一樣的問候語。 加入與c類似的if-else if (條件) { 成立時執行 }else 不成立時執行 } | #! /usr/bin/perl –w print “ what’s your name”; $name = <STDIN>; chomp($name); if ($name eq “Randal”){ print “Hello , Randal! how good of you to be here!\n” } else { print “Hello , $name!\n”; #ordinary greeting(註解) } |