perl语言

Posted 2023-03-31 VicentZJ

perl 写程序，在 xxx.log 中找到 fail 单词

读取文件

  文件操作时候， "<"表示读取， ">"表示写入，“>>”表示追加

  如果读取成功，就返回一个不为0的数字，作为判断依据。

正则匹配

逐行读取文件，并进行正则匹配。

  使用while（<文件句柄>） 对文件进行逐行读取

  每一行的值会自动保存在一个 $_ 的特殊变量中

  获取该行的值，并进行正则匹配

  如果匹配成功，匹配的字符串自动保存在 $& 变量中，打印

 

关闭文件

  

总结

 

$_              默认输入，在文件逐行读取时，就是每次读取的内容
$& 或 $MATCH    上一次成功匹配的字符
=~              匹配
!~              不匹配
m/str/ 或/str/  正则表达式，看是否含有字符串 str
<, >, >>        代表读取、写入、追加

 

 

 

Perl语言

Perl是高级、通用、直译式、动态的程序语言家族。最初设计者拉里·沃尔（Larry Wall）为了让在UNIX上进行报表处理的工作变得更方便，决定开发一个通用的脚本语言，而在1987年12月18日发表。目前，Perl语言家族包含两个分支Perl 5以及Perl 6（开发中）。

Perl借用了C、sed、awk、shell脚本以及很多其他编程语言的特性。其中最重要的特性是Perl内部集成了正则表达式的功能，以及巨大的第三方代码库CPAN。

Perl语言的中心思想可以集成为一句话“TMTOWTDI”：

There‘s More Than One Way To Do It.

（不只一种方法来做一件事。）

 

作为开始学习编程语言的第一个示例：

#!/usr/bin/env perl

print "Hello, world!\n";

 

参考文献：

[1] Perl. 维基百科.