《perl執行個體精解》學習筆記 第一天

一，樣本一

#!/usr/bin/perl     print "what's your name? ";     chomp($name= <STDIN>);     print "welcome, $name,are you ready learn Perl now? ";     chomp($response = <STDIN>);     if ($response eq "yes" or $response eq "y") {       print "Great! Let's get started learning Perl by example.\n";     }     else {      print "O.K. Try again later.\n" }     $now = localtime;     print "$name,you ran this script on $now.\n";

解釋

01行是標示解譯器是perl執行

02用print列印到螢幕輸出，perl用print "顯示內容"；即可

03chomp去掉最後一個字元，即去掉分行符號

$name= <STDIN>是設定一個變數$name,來自標準輸入<STDIN>,

需要注意的是perl中的變數是$開頭

注意perl的變數無需申明即可使用，非常靈活

運行如下

04和05同理

06是一個if語句判斷，格式為

if （條件1成立）{    執行語句1    }    else {    執行語句2    }

$response eq "yes" or $response eq "y"的意思是變數$response的值為yes，或是y

12是設定一個變數now，來自perl的內建函數localtime

13是顯示