一,示例一

  1. #!/usr/bin/perl  
  2. print "what's your name? ";  
  3. chomp($name<STDIN>);  
  4. print "welcome, $name,are you ready learn Perl now? ";  
  5. chomp($response = <STDIN>);  
  6. if ($response eq "yes" or $response eq "y") {  
  7.   print "Great! Let's get started learning Perl by example.\n";  
  8. }  
  9. else {  
  10.  print "O.K. Try again later.\n"  
  11. }  
  12. $now = localtime;  
  13. 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语句判断,格式为
  1. if (条件1成立){ 
  2. 执行语句1 
  3. else { 
  4. 执行语句2 
$response eq "yes" or $response eq "y"的意思是变量$response的值为yes,或是y
12是设定一个变量now,来自perl的内建函数localtime
13是显示

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

  1. #!/usr/bin/perl 
  2. print "this  
  3.           is 
  4.             a  
  5.               test 
  6.                 !\n"; 
  7. $num=5+4*2; 
  8. $num1=5 + 4 * 2; 
  9. print "$num\n"; 
  10. print "$num1\n"; 

结果如下

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

二,perl中的注释

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

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

  1. #perl filename.pl    执行filename.pl 
  2. #perl -c filename.pl 检查语法 
  3. #perl -w filename.pl 运行脚本,并对错误的语法进行提示 
  4. 或者是加执行权限
  5. #chmod +x filename.pl 加执行权限
  6. #./filename.pl 执行脚本

四,命令行使用perl

  1. -e参数命令行执行perl语句
  2. #perl -e 'print "hello\n";' 
  3. hello  输出hello
  4. -n参数,逐一按行显示
  5. #perl -ne 'print;' /etc/passwd
  6. root:x:0:0:root:/root:/bin/bash bin:x:1:1:bin:/bin:/sbin/nologin daemon:x:2:2:daemon:/sbin:/sbin/nologin
  7. -c,如前所述,检查语法
  8. -w,执行并检查语法

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