Perl
文章平均质量分 57
zhangzijian36
这个作者很懒,什么都没留下…
展开
-
如何获取perl脚本当前路径
<br />use File::Basename;<br />my $dir = File::Basename::dirname($0);<br />print $dir;原创 2010-12-20 15:28:00 · 653 阅读 · 0 评论 -
Perl 学习笔记(小骆驼书)-标量数据1
<br />61298040283768<br />读起来有些困难。Perl 允许用下划线来分隔它,因此可以像下面这样书写:<br />61_298_040_283_768<br /> <br /> <br />2.1.4 非十进制整数<br />同许多其它语言一样,Perl 也允许使用非10 为底的数字。八进制以0 开头,十六进制以0x 开头,二进制0b 开头◆。在十<br />六进制中A 到F(或者a 到f)分别表示10 到15:<br /> <br />0377 #八进制数字377,等同于十进制数字2原创 2010-11-22 13:56:00 · 180 阅读 · 0 评论 -
Log4Perl
<br />Study Link:<br />http://www.perl.com/pub/2002/09/11/log4perl.html原创 2011-01-13 13:53:00 · 186 阅读 · 0 评论 -
Perl的English模块
<br />Perl中有很多以$开头的特殊变量,如果使用得当,可以写出简洁高效的代码,但对于阅读代码来说就带来了一些困扰。因此Perl内置了名为English的模块,对这些特殊变量定义了英文别名,记录于此备查。<br />special variablealiasmiscellaneous $_$ARG@_@ARG$"$LIST_SEPARATOR$;<br />$SUBSCRIPT_SEPARATOR or $SUBSEPregular expression or matching $&$MATCH$`$转载 2011-01-07 11:12:00 · 265 阅读 · 0 评论 -
Perl 调试方法
<br />缺省的Perl调试器就是perl解释器本身,另外还有图形界面的调试器。因为我们在<br />开发程序时一般都使用telnet访问服务器,所以这里主要介绍一下缺省的命令行调<br />试器的用法。用-d 命令行选项启动Perl解释器,例如 perl -d test.pl 即进入<br />Perl调试器的交互界面。<br /><br />调试命令列表如下:(所有命令都在调试提示符下顶格输入,命令大小写有关)<br /><br />h:显示调试器的帮助信息。<br /><br />|h:以分页形式显转载 2011-01-06 15:24:00 · 3389 阅读 · 0 评论 -
CPAN 的捆绑模块
表14-1。 CPAN 的捆绑模块模块 描述GnuPG?::Tie::Encrypt 把一个文件句柄和 GNU Privacy Guard 加密捆绑在一起IO::WrapTie 把捆绑对象和一个 IO:Handle 接口封装在一起。MLDBM在一个DBM 文件里透明地存储复杂的数据值,而不仅仅是简单的字串。Net::NISplusTied 把散列和 NIS+ 表捆绑在一起Tie::Cache::LRU 实现一个最近最少使用缓冲Tie::Const 提供常数标量和散列T转载 2011-01-05 14:04:00 · 215 阅读 · 0 评论 -
Perl特殊变量
<br />本文由 [color=red]chaoslawful[/color] 和鄙人共同翻译完成。 <br />我原来翻译过一部分,不过没有翻完,后来幸亏 chaoslawful 的努力,所以才终于完成此文。 <br />最新版本可以从这里获取(POD 格式): <br />http://svn.perlchina.org/trunk/POD2-CN/lib/POD2/CN/perlvar.podNAME<br /> perlvar - Perl 预定义变量<br /><br />DESC转载 2011-01-05 13:21:00 · 254 阅读 · 0 评论 -
Perl语言中BEGIN和END的使用
<br />本文和大家重点学习一下Perl语言中BEGIN和END的使用,Perl能在绝大多数操作系统运行,可以方便地向不同操作系统迁移,希望本文的介绍能让你有所收获。<br />关于Perl语言中BEGIN和END的使用<br />Perl语言学习者必须关注…很强实用性。<br />有些时候我们需要在Perl业务代码开始执行之前做一些初始化工作,或者在结束的时候做一些收尾的工作,Perl语言提供了这样的块BEGIN和END帮助Perl程序员实现这些操作。<br />下面我先看一个简单的例子做为BEGIN和转载 2011-01-04 12:58:00 · 282 阅读 · 0 评论 -
perl中use和require对比(转)
perl中use和require对比(转)http://hi.baidu.com/ancle_yi/blog/item/3dba69c0be2cdc3fe4dd3b21.html/cmtid/09295f339a661b15eac4af49<br /> <br />对比(一)说明:<br />这两个函数都是一个意思,加载和引用PERL的模块,或者是子程序,<br />区别在于USE是在当前默认的里面去寻找,一旦模块不在指定的区域内的化,用USE是不可以引入的<br />第一、use引入的名称不需要后缀名,而转载 2011-01-04 11:02:00 · 175 阅读 · 0 评论 -
如何访问telnet
<br />use Net::Telnet (); $t = new Net::Telnet (Timeout => 10, Prompt => '/bash/$ $/'); $t->open("sparky"); $t->login($username, $passwd); @lines = $t->cmd("who"); print @lines;<br /> <br />http://search.cpan.org/~jrogers/Net-Telnet-3.03/lib/Net/Telnet.pm原创 2010-12-20 15:39:00 · 176 阅读 · 0 评论 -
Perl 学习笔记(小骆驼书)-标量数据2
<br />2.4.2 标量赋值<br /> <br />标量变量最通常的操作是赋值:将值赋给变量。Perl 中的赋值符是等号(和许多语言类似),将等号右边的值赋给等号左边<br />的变量:<br />$fred = 17; #将17 赋给变量$fred<br />$barney =‘hello’; #将五个字母的字符串‘hello’赋给$barney<br />$barney = $fred + 3;# 将$fred 的值加上三赋给$barney (20)<br />$barney= $barney*2原创 2010-11-22 14:12:00 · 229 阅读 · 0 评论