Perl
文章平均质量分 69
RabbitEatPumpkin
这个作者很懒,什么都没留下…
展开
-
perl简单读写文件
<br />perl的读写文件非常简单,闲话不多说,直接上代码就能体会到了。<br /> <br />#!/usr/bin/perl -wuse strict;unless (open (MYFILE, "<file1")) { die ("cannot open input file file1/n"); }else{ while(<MYFILE>) {print $_;} #print MYFILE ("wahaha./n");原创 2011-05-12 11:01:00 · 9260 阅读 · 0 评论 -
linux下运行perl
<br />1.需要新建perl文件,我是通过vi创建的。<br /> 首先我创建一个目录:mkdir /tmp/perltest<br /> 然后进入这个目录: cd /tmp/perltest<br /> 然后创建hello.pl: vi hello.pl<br /> vi打开该pl时,需要进入insert模式,那点击“i”“o”“a”都可以。写完pl的脚本内容后,esc就能退出insert的模式,:wq就退出了vi的模式了。<br />2.经ls -al的查看,刚创建的文件的权限,当原创 2011-05-12 15:05:00 · 16596 阅读 · 0 评论 -
Perl的数组与hash表使用的对比
<br />比如,你需要从一个文件或者是从console输入一堆单词,你需要查看这堆单词里某些你需要的单词们出现了次数。我分别用数组和hash表来处理这种情况:我假设我是从console输入一堆单词的,并且我需要查出首字母大写的单词<br /> <br />数组版:<br />#!/usr/bin/perl -wuse strict;while(my $var = <STDIN>){ my @wordlist = (); my @wordcount = (); my原创 2011-05-18 17:13:00 · 1064 阅读 · 0 评论 -
perl的变量@_
<br />这个变量很神奇。<br />@_ is the list of incoming parameters to a sub. So if you write a sub, you refer to the first parameter in it as $_[0], the second parameter as $_[1] and so on. And you can refer to $#_ as the index number of the last parameter。<br /> <原创 2011-05-19 13:46:00 · 1017 阅读 · 0 评论 -
perl的特殊变量
<br />原作者:Dave Cross<br />翻译者:sql (http://www.s8s8.net)<br />正文<br />让你的perl代码看起来更像perl代码,而不是像C或者BASIC代码,最好的办法就是去了解perl的内置变量。perl可以通过这些内置变量可以控制程序运行时的诸多方面。<br />本文中,我们一起领略一下众多内置变量在文件的输入输出控制上的出色表现。<br />行计数<br />我决定写这篇文章的一个原因就是,当我发现很多人都不知道“$.”内置变量的存在,这的确让我很吃转载 2011-05-19 11:51:00 · 629 阅读 · 0 评论 -
2011测试全记录(linux下安装perl的DBI和DBD)
在linux虚拟机上安装了oracle的client端,需要用perl来抓取数据库中的数据,于是需要安装perl的DBI和DBD包,分别是DBI-1.616和DBD-Oracle-1.28。需要使用root安装DBI和DBD,在安装前,确保.bash_profile中root的环境变量,已经设定了ORACLE_HOME(oracle的client端路径),ORACLE_SID(你需要连原创 2011-06-14 16:50:00 · 1527 阅读 · 0 评论 -
模式测试程序
<br />常常用正则表达式进行模式匹配,不确定自己写的对不对时,可以先模式测试一下:<br />#!/usr/bin/perl -wuse strict;while (<>){ chomp; if (/YOUR_PATTERN/){ print "Matched: |$`<$&>$'|/n"; } else { print "No match: |$_|/n"; }}<br />而如代码所示,perl提供了几个自动匹配原创 2011-05-09 15:50:00 · 837 阅读 · 0 评论