??斗地主捕鱼电竞提现秒到 广告位招租 - 15元/月全站展示
??支付宝搜索579087183领大额红包 ??伍彩集团官网直营彩票
??好待遇→招代理 ??伍彩集团官网直营彩票
??络茄网 广告位招租 - 15元/月全站展示
Perl中的特殊符号介绍

转载   mdxy-dxy   2017-10-09   浏览量:2807


$_  

俗称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中的 【对象.方法名】中的点号

:: 表示调用类的一个方法

% 散列的标志,定义一个键值对类型的

@ 数组的标志

$ 标量的标志

=~ 匹配的标志

!~ 不匹配的标志

$! 根据上下文返回错误号或者错误串

转载自://www.jb51.net/article/125300.htm

招聘 不方便扫码就复制添加关注:程序员招聘谷,微信号:jobs1024



perl uc,lc,ucfirst,lcfirst大小写转换函数
这篇文章主要介绍了perl 大小写字母转换函数,需要的朋友可以参考下
Perl中的符号 ->;、=>; 和 :: 分别表示什么意思?
这篇文章主要介绍了Perl中的符号 ->;、=>; 和 :: 分别表示什么意思,需要的朋友可以参考下
Perl中的特殊符号介绍
这篇文章主要介绍了Perl中的特殊符号介绍,需要的朋友可以参考下
Perl时间处理函数用法介绍
本文重点讨论Perl时间处理函数的概念,Perl能在绝大多数操作系统运行,可以方便地向不同操作系统迁移,并且Perl借取了C、sed、awk、shellscripting以及很多其他程序语言的特性
Perl字符串处理函数大全
本文重点讨论Perl字符串处理函数的用法,每种函数都有各自的特点和作用,需要的朋友可以参考下
Perl字符串比较和整数比较的区别详解
这篇文章主要介绍了详解Perl字符串比较和整数比较的区别,需要的朋友可以参考下
Perl 批量添加Copyright版权信息
对所有输入文件,如果没有版权信息则加上版权信息,否则什么都不做,并对原文件以.bak结尾备份,需要的朋友可以参考下
使用Perl生成随机密码
本文给大家分享的是使用perl生成随机密码的方法示例,而且可以通过参数来控制密码中包含的字符种类,非常的不错,有需要的小伙伴可以参考下
在Django框架中自定义模板过滤器的方法
这篇文章主要介绍了在Django框架中自定义模板过滤器的方法,Django是重多人气Python框架中最为著名的一个,需要的朋友可以参考下
Perl实现高水线算法(解决多值比较问题方法)
这篇文章主要介绍了Perl实现高水线算法(解决多值比较问题方法),从本文代码示例中还可以学习到数组遍历、函数写法、函数调用等知识,需要的朋友可以参考下