《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";  
 
 

解释

 
 


  
  
if （条件1成立）{ 

  
  
执行语句1 

  
  
} 

  
  
else { 

  
  
执行语句2 

  
  
} 
 
 

perl是一种格式自由的语言，这意味着用户可以在任何位置放置脚本语句，甚至还能让同一个语句跨行出现

 
 


  
  
#!/usr/bin/perl 

  
  
print "this  

  
  
          is 

  
  
            a  

  
  
              test 

  
  
                !\n"; 

  
  
$num=5+4*2; 

  
  
$num1=5 + 4 * 2; 

  
  
print "$num\n"; 

  
  
print "$num1\n"; 
 
 

结果如下

可见空白对结果毫无影响，这里的空白包括。空格，制表符以及换行符

二，perl中的注释

 
 


  
  
注释由#开头，无法使用C中的/* */或者C++中的// 
 
 

三，执行脚本(习惯把perl程序结尾写为pl，便于和其他区分)

 
 


  
  
#perl filename.pl    执行filename.pl 

  
  
#perl -c filename.pl 检查语法 

  
  
#perl -w filename.pl 运行脚本，并对错误的语法进行提示 

  
  
或者是加执行权限

  
  
#chmod +x  filename.pl 加执行权限

  
  
#./filename.pl         执行脚本
 
 

四，命令行使用perl

 
 


  
  
-e参数命令行执行perl语句

  
  
#perl -e 'print "hello\n";' 

  
  
hello   输出hello

  
  
-n参数，逐一按行显示

  
  
#perl -ne 'print;' /etc/passwd

  
  
root:x:0:0:root:/root:/bin/bash bin:x:1:1:bin:/bin:/sbin/nologin daemon:x:2:2:daemon:/sbin:/sbin/nologin

  
  
-c，如前所述，检查语法

  
  
-w，执行并检查语法
 
 

后记：学perl有一段时间了，但学的比较零散，在此写个人读书笔记，防止遗忘。

本文转自it你好 51CTO博客，原文链接：http://blog.51cto.com/itnihao/986020，如需转载请自行联系原作者