初识Perl

Perl 是解释运行的。一般Perl程序的第一行需注明自己是个Perl程序而不是shell程序 。

一般将下面的一行作为文件的第一行

#!/usr/bin/perl

第一个Perl示例程序。

#!/usr/bin/perl                                   ##说明这是一个perl程序
$password="wsxy"; <span style="white-space:pre">				</span>  ##声明一个变量存放密码
printf "whta's your name?";   <span style="white-space:pre">			</span>  ##打印语句
$name=<STDIN>;<span style="white-space:pre">					</span>  ##从键盘获得行并赋值给变量$name，这个值有换行符
chop($name);                                      ##去掉$name中的换行符
if($name eq "Gino"){<span style="white-space:pre">				</span>  ##用eq操作符对两个字符串进行比较
    printf "Hello ! Gino,welcomen";
}
else{
    printf "Hello ! $name!n Please enter password: ";
    $guess=<STDIN>;
    chop($guess);
    while($guess ne $password){
    printf "password error,enter again： "；
    $guess=<STDIN>;
    chop($guess);
    }
}