找回密码
 加入
搜索
查看: 2478|回复: 10

今天看了看 perl 的语法,真的是简练到变态

[复制链接]
发表于 2016-4-8 15:10:01 | 显示全部楼层 |阅读模式
这语法简直逆天了,太多内置变量!新入手很多地方不好懂。


#!perl

# < 代表读,>代表截断写,>>追加写
if (open(READFILE, "<d:/code/FindWord.pl")) {
        while (<READFILE>) {
                s/^\s*//;                # 正则这样写就行了,不用指明对谁作用
                print "$_";                # 内置变量,上面正则相当于对这个内置变量操作
        }
        close(READFILE);
}
发表于 2016-4-8 17:45:40 | 显示全部楼层
这个好用不
发表于 2016-4-8 17:54:42 | 显示全部楼层
梦幻脚本语言
 楼主| 发表于 2016-4-9 20:36:31 | 显示全部楼层
回复 2# zch11230


    刚开始熟悉,准备做后端用。
发表于 2016-4-9 21:52:28 | 显示全部楼层
不是用python么?
 楼主| 发表于 2016-4-10 21:46:53 | 显示全部楼层
回复 5# heroxianf


    后端脚本有很多呀,不一定就是 python。php、perl 都属于脚本的一种。
发表于 2016-4-10 23:45:25 | 显示全部楼层
回复 6# nmgwddj


    是的,因为我公司里就有一个坚持用python的。我也不理解!
 楼主| 发表于 2016-4-12 13:30:28 | 显示全部楼层
回复 7# heroxianf


    那一定有他的理由啦,Python 语法简练,而且面向对象支持也比较好。社区也比较大,做后端很不错的。现在用 Python 做运维的也很多。
发表于 2016-4-12 14:27:00 | 显示全部楼层
回复 8# nmgwddj


    我还是觉得au3够用了。
发表于 2016-8-2 22:26:40 | 显示全部楼层
本帖最后由 shuren88 于 2016-8-2 23:07 编辑

#这段时间也在学习perl,练习一下做一些理解注释,仅供参考交流。确实不理解就类似天书,理解了就并不神秘。
#看的视频教程简单易懂:猎豹网校Perl零基础入门、猎豹网校Perl实用教程

# 下面代码已在 Windows Server 2008 R2 中测试通过
# < 代表读,>代表截断写,>>追加写
# 读取方式打开文件d:/code/FindWord.pl,文件变量为READFILE。默认以读取方式打开文件,所以 < 可以省略
if (open(READFILE, "<d://code//FindWord.pl")) { # 注意:Windows下路径中的\要用\\或//
  while (<READFILE>) { # 在perl中 <> 称为钻石操作符,功能强大诡异。这里 <READFILE> 为行输入操作符,
                       # 循环读取打开文件中的每一行存入可以省略的 默认变量$_ 中进行处理
          s/^\s*//;    # 对默认变量$_ 进行操作,默认变量 $_ 可以省略。也可以全写为 $_=~s/^\s*//; ,
                       # =~为绑定操作符。s/^\s*//; 该语句中 s 是搜索替换操作,/ 是定界符。
                       # 3个定界符将 s 之后的语句分为两段,搜索前一段,用后一段进行替换。
                       # 要搜索的前一段 /^\s*/ ,^ 指定从每一行的开头开始搜索,
                       # 转义字符 \s 是搜索空白(空格、制表符等),* 是 0-n 个
                       # 要替换的后一段 // 为空,意思就是将搜索到的字符串删除
                       # 简言之, s/^\s*//; 一句就是删除每个文本行行首的所有空白。
                       # 处理结果存回默认变量$_中
          print "$_";  # 该句也可省略默认变量$_,简写为 print; 。就是将处理后的文本行输出到屏幕上
  }
  close(READFILE);     # 关闭文件
}

评分

参与人数 1金钱 +10 收起 理由
nmgwddj + 10 厉害

查看全部评分

发表于 2016-12-19 22:02:00 | 显示全部楼层
还是AU3适合新手
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-3-19 11:04 , Processed in 0.080161 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表