加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

《perl实例精解》学习笔记第一天

发布时间:2020-12-15 21:05:59 所属栏目:大数据 来源:网络整理
导读:一,示例一 #!/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!?
 
 

一,示例一

 
 
  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. }?
  4. else?{?
  5. 执行语句2?
  6. }?
$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?"$numn";?
  10. print?"$num1n";?

结果如下

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

二,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?"hellon";'?
  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有一段时间了,但学的比较零散,在此写个人读书笔记,防止遗忘。

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读