Perl中的特殊符号介绍
$_
俗称perl的老地方,当你的程序中未告知使用哪个参数或者变量时,perl就会自动使用$_中的值,比如
for(1..10){ print ; }
这里print没有指定参数,所以它就会使用$_,那$_里面是什么呢?每次循环$_的值都会变化,所以$_实际上就是1 .. 10这10个值,所以上面的代码打印的结果就是12345678910
$!
当且仅当某个函数调用失败时才会设置该变量,所以经常这样使用这个变量
open FILE,"<d:/code/zdd.txt" or die $! ;
$/
这是perl中的行分隔符,默认是换行符,可以改变这个变量以便一次读入整个文件,如下
sub test{ open FILE,"<d:/code/zdd.txt" or die $! ; my$olds= $/ ; local $/=undef ; my$slurp=<FILE> ; print$slurp,"\n" ; $/=$olds ; }
$`
正则表达式匹配变量,代表匹配位置之前的内容
$&
正则表达式匹配变量,代表匹配的内容
$'
正则表达式匹配变量,代表匹配位置之后的内容
来看一个例子,解析xml文件,有如下xml文件,我想获得Code节点的值
<?xml version='1.0' encoding='UTF-8'?>
<Code>200</Code>
用下面的perl代码来解析
my$str="<Code>200</Code>" ; if($str=~/(?<=<Code>)(\d+)(?=<\/Code>)/){ print"string before matched: $`","\n" ; print"matched string: $&","\n" ; print"string after matched: $'","\n" ; }
运行结果是
string before matched: <Code>
matched string: 200
string after matched: </Code>
其中$`对应<Code>,$&对应200,$'对应</Code>
$|
控制对当前选择的输出文件句柄的缓冲,例子待添加。
@_
传给子程序的参数列表,通常一个子程序是这样获得传给它的参数的。
sub add { my ($num1, $num2) = @_; return $num1 + $num2; }
如果子程序只有一个参数,也可以用shift来获取,此时,shift相当于shift @_
sub square { my $num = shift ; # same as my $num = shift @_ return $num * $num; }
perl常见符号
=> 键值对,左键右值
-> 引用,相当于java中的 【对象.方法名】中的点号
:: 表示调用类的一个方法
% 散列的标志,定义一个键值对类型的
@ 数组的标志
$ 标量的标志
=~ 匹配的标志
!~ 不匹配的标志
$! 根据上下文返回错误号或者错误串
相关文章
- 这两天在用Perl编写一些监控脚本,其实写代码也是一件挺有意思的事情,就是挺废时间的。而且,由于语法不太熟,基本想到一个东西都要先Google一下看怎么实现。...2020-06-29
- 一、简介 模式指在字符串中寻找的特定序列的字符,由反斜线包含:/def/即模式def。其用法如结合函数split将字符串用某模式分成多个单词:@array = split(/ /, $line);二、匹配...2020-06-29
- 下面小编就为大家带来一篇Perl与JS的对比分析(数组、哈希)。小编觉得挺不错的,现在就分享给大家,也给大家做个参考。一起跟随小编过来看看吧...2020-06-29
- Perl时间函数localtime的使用介绍,这里简单的介绍下,更多请查看官方介绍...2020-06-29
- 一、列表 列表是包含在括号里的一序列的值,可以为任何数值,也可为空,如:(1, 5.3 , "hello" , 2),空列表:()。 注:只含有一个数值的列表(如:(43.2) )与该数值本身(即:43.2 )是不同...2020-06-29
- 这篇文章主要介绍了Perl中的特殊内置变量详细介绍,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了讲Perl中的本地时间与UNIX时间戳间相互转换的方法,主要用到了Perl中的Date::Parse模块,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了Java中正则表达式split()特殊符号使用详解,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友们下面随着小编来一起学习学习吧...2020-07-21
- 对所有输入文件,如果没有版权信息则加上版权信息,否则什么都不做,并对原文件以.bak结尾备份,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了Perl学习笔记之CPAN使用介绍,本文讲解了什么是CPAN、CPAN的目录作用介绍、CPAN安装Perl Module的两种方法等内容,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了Perl中使用MIME::Lite发送邮件实例,本文介绍了使用sendmail方式发送、发送HTML格式邮件、smtp方式发送邮件等内容,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了Perl AnyEvent中的watcher实例,关于AnyEvent请参阅的更多介绍请参阅文中的相关链接,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了Java解析xml文件遇到特殊符号&会出现异常的解决方案,实现思路很简单通过在读取xml文件使用SAX解析前读取reader,具体实现方法及示例代码跟随小编一起看看吧...2021-05-14
- perl获取日期与时间的例子,供大家学习参考...2020-06-29
- 这篇文章主要介绍了Perl中的列表和数组学习笔记,本文讲解了列表、数组--列表的存贮、数组的存取、字符串中的方括号和变量替换、列表范围、数组的输出等内容,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了使用perl实现拆分数据表(mysql)并迁移数据实例,本文提供了3个脚本,分别用于拆分数据表、迁移数据、插入测试数据,需要的朋友可以参考下...2020-06-29
- 这篇文章主要介绍了7个perl数组高级操作技巧,本文讲解了数组去重、数组合并、查找最大值、列表归并等内容,需要的朋友可以参考下...2020-06-29
- 写过很多关于Perl编程,今天继续分享一篇利用perl后门实现正向和反向连接的实例代码,需要的朋友可以参考下其中的内容详情...2020-06-29
perl uc,lc,ucfirst,lcfirst大小写转换函数
这篇文章主要介绍了perl 大小写字母转换函数,需要的朋友可以参考下...2020-06-29- 这篇文章主要介绍了Perl内置特殊变量总结,需要的朋友可以参考下...2020-06-29