![](https://img-blog.csdnimg.cn/20201014180756922.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Perl
文章平均质量分 66
gan690416372
这个作者很懒,什么都没留下…
展开
-
perl中my、local和our区别与联系
“our”,"把名字限于某个范围“,其实就是明确声明一个"全局变量",虽然是在某个模块或者函数里面定义的,外面的也可以访问,如果已经声明过了,再次用"our",表示此处用的是全局的那个,不是同名的私有或者局部变量our $PROGRAM_NAME = "waiter";{my $PROGRAM_NAME = "something";our $PROGRAM_NAME = "serv原创 2010-01-13 08:56:00 · 5484 阅读 · 2 评论 -
PERL 用EVAL 来捕捉异常Exception
$total=0;$count=0;eval { $average = $total / $count ; print "xxx/n";} ; if ($@){ print "wrong /n";}else{ print "right/n";} eval块的结束时的分号是必须的,因为不像 if或者while那样的控制结构,eval实际上是个函数。但是代码块是真的块,所以可以包括词法原创 2010-01-13 09:41:00 · 4743 阅读 · 0 评论 -
关于perl中命令执行以及@ARGV的使用
Normal 0 7.8 磅 0 2 false false false EN-US ZH-CN X-NONE原创 2010-01-10 01:57:00 · 13673 阅读 · 1 评论 -
关于perl中的sleep函数
关于perl中的sleep函数 sleep EXPR sleep这个函数令脚本睡眠 EXPR 秒,如果没有 EXPR 则是永久睡眠,并且返回睡眠的秒数。 你可以通过给该进程发送一个 SIGALRM 的方法来中断睡眠。在一些老式系统里,它可能比你要求的描述整整少睡一秒,具体情况取决于它是如何计算秒的。大多数现代的系统都是睡足秒数。不过,在这些 系统上它们很有可能睡眠的时间要长一些原创 2010-01-11 10:24:00 · 12201 阅读 · 0 评论 -
关于perl的文件读取
关于perl的文件读取 Perl语言操作文件是很常使用的操作,本文将介绍读取文件的一点小技巧。本文将介绍两种读取文件的方法: l 使用perl的内置函数readline;l 另外一种就是使用文件句柄直接操作""。 1. 使用readline readline EXPRreadline 从文件句柄中读取数据,在标量环境中每一次从文件原创 2010-01-10 23:44:00 · 6085 阅读 · 9 评论 -
关于perl中Exit的函数使用
关于perl中Exit的函数使用 o exit EXPR o exit这个函数把 EXPR 当作一个整数计算然后立即以该数值为最终的程序错误状态退出。如果省略了 EXPR,那么该函数以 0 状态退出(意思是“没有错误”)。同时,函数的状态是0代表着程序执行成功后推出,如果是1代表是程序执行失败后推出。当然,函数的状态还可以取其他的值,但是眼根据perl语言具体运行的环境原创 2010-01-11 09:57:00 · 12145 阅读 · 0 评论 -
Perl 环境变量汇总
$- 当前页可打印的行数,属于Perl格式系统的一部分$! 根据上下文内容返回错误号或者错误串$” 列表分隔符$# 打印数字时默认的数字输出格式$$ Perl解释器的进程ID$% 当前输出通道的当前页号$& 与上个格式匹配的字符串$( 当前进程的组ID$) 当前进程的有效组ID$* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之.$, 当前输出字段分隔符$. 上次阅读的文件的当前输入行号$原创 2010-01-06 17:35:00 · 2011 阅读 · 2 评论 -
关于gethostbyaddr(perl)
关于gethostbyaddr(perl) gethostbyaddr ADDR, ADDRTYPE 这个函数把地址转换成名字(和改变地址)。ADDR 应该是一个封包的二进制网络地址,而 ADDRTYPE 实际上通常应该是 AF_INET(来自 Socket 模块)。其返回值在列表环境里是: ($name, $aliases, $addrtype, $length, @ad原创 2010-01-08 00:10:00 · 1050 阅读 · 1 评论 -
关于gethostbyname(perl)
关于gethostbyname(perl) ($name,$aliases,$addrtype,$length,@addrs) = gethost* For the *gethost*()* functions,the @addrs value returned by a successfulcall is a list of the raw addresses returne原创 2010-01-08 00:06:00 · 835 阅读 · 0 评论 -
关于gethostbyname(perl)
关于gethostbyname(perl) ($name,$aliases,$addrtype,$length,@addrs) = gethost* For the *gethost*()* functions,the @addrs value returned by a successfulcall is a list of the raw addresses returne原创 2010-01-07 16:31:00 · 1413 阅读 · 0 评论 -
关于inet_aton和inet_ntoa(perl)
关于inet_aton和inet_ntoa(perl) 得到DNS地址的两个主要函数是Socket模块中的inet_aton()函数,用来保存DNS地址,然后使用inet_ntoa()函数把保存的地址转换成IP地址。 l inet_aton HOSTNAMETakes a string giving the name of a host, and translates tha原创 2010-01-07 15:21:00 · 3612 阅读 · 1 评论 -
perl 的select 函数
perl 的select 函数 语法: select FILREHADL select select RBITS,WBITS, EBITS,TIMEOUT 定义和用法 设置输出的文件句柄(FILEHANDLER)为默认文件句柄(default FILEHANDLER)。指定文件句柄,然后返回当前的默认文件句柄的名称。原创 2010-01-06 12:27:00 · 8925 阅读 · 1 评论 -
关于perl中的反勾号(``),system和exec
关于perl中的反勾号(``),system和exec 在perl中反勾号(``),system和exec都用来执行命令,这篇文章将给我们介绍它们各自的使用方法,联系,以及区别。 一、使用方法1. 反勾号(``)首先,我们有命令输入操作符,也叫反勾号操作符,因为它看起来象这样: $info = `finger $user`; 一个用反勾号(技术上叫重音号原创 2010-01-14 10:39:00 · 2520 阅读 · 1 评论 -
关于perl中BEGIN和END的使用
关于perl中BEGIN和END的使用 Perl语言学习者必须关注…很强实用性。有些时候我们需要在perl业务代码开始执行之前做一些初始化工作,或者在结束的时候做一些收尾的工作,perl提供了这样的块BEGIN和END帮助perl程序员实现这些操作。下面我先看一个简单的例子做为BEGIN和END功能的解释: 0.#! use/bin/perl1.print "pid原创 2010-01-13 10:36:00 · 2993 阅读 · 0 评论