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

nmgwddj

这语法简直逆天了，太多内置变量！新入手很多地方不好懂。

#!perl

# < 代表读，>代表截断写，>>追加写
if (open(READFILE, "<d:/code/FindWord.pl")) {
        while (<READFILE>) {
                s/^\s*//;                # 正则这样写就行了，不用指明对谁作用
                print "$_";                # 内置变量，上面正则相当于对这个内置变量操作
        }
        close(READFILE);
}

zch11230

这个好用不

Wh1t3

梦幻脚本语言

nmgwddj

回复 2# zch11230


    刚开始熟悉，准备做后端用。

heroxianf

不是用python么？

nmgwddj

回复 5# heroxianf


    后端脚本有很多呀，不一定就是 python。php、perl 都属于脚本的一种。

heroxianf

回复 6# nmgwddj


    是的，因为我公司里就有一个坚持用python的。我也不理解！

nmgwddj

回复 7# heroxianf


    那一定有他的理由啦，Python 语法简练，而且面向对象支持也比较好。社区也比较大，做后端很不错的。现在用 Python 做运维的也很多。

heroxianf

回复 8# nmgwddj


    我还是觉得au3够用了。

shuren88

#这段时间也在学习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);     # 关闭文件
}

hfutxkk

还是AU3适合新手