随笔分类 -  [48] Perl

摘要:引用 在很多场合下使用引用传值,能在很大程度上提高代码的运行效率。 定义一个引用在变量名前加”\”就可以了,如: $ra=\$a; $rb=\@b; $rc=\%c; 变量名前面依然是$。 而得到的引用是不能直接当做变量使用,需要解引用。解引用的方法是在变量名前加上变量原本类型所对应的符号。比如$r 阅读全文
posted @ 2017-05-15 09:08 emanlee 阅读(380) 评论(0) 推荐(0)
摘要:交互式编程你可以在命令行中使用 -e 选项来输入语句来执行代码,实例如下:$ perl -e 'print "Hello World\n"'输入以上命令,回车后,输出结果为:Hello World 脚本式编程我们将以下代码放到 hello.pl 文件中:#!/usr/bin/perl# 输出 "He 阅读全文
posted @ 2017-05-14 20:23 emanlee 阅读(1032) 评论(0) 推荐(0)
摘要:<一> 语句及注释: Perl 语句以分号(;)结尾,用 # 作为一行的注释,没有其它语言中那种跨行的注释。代码块用大括号围起来,这个和 C 类似,但这个大括号在有些地方是强制要求,如在 if ,for,do, while 等语句中,它不像其它语言一样会用缩进来判断块。 <二> 变量: 标量(sca 阅读全文
posted @ 2017-05-14 20:02 emanlee 阅读(1800) 评论(0) 推荐(0)
摘要:如果是Linux系统,随意打开一个终端;如果用的是Windows系统,那么打开命令提示符。 输入以下命令: perldoc Bio::SeqIO 以上命令的作用是查看Bio::SeqIO模块的文档是否存在,如果存在,则会有相应的文档输出,则安装了Bio::SeqIO模块;如果没有,说明Perl找不到 阅读全文
posted @ 2015-03-31 18:44 emanlee 阅读(4583) 评论(0) 推荐(0)
摘要:1、$position = index(string,substring,skipchars); 该函数返回子串substring在字符串string中的位置,如果不存在,则返回-1;参数skipchars是可选参数,表示查找之前跳过的字符数,即:从该位置处开始查找; 2、rindex(string 阅读全文
posted @ 2014-09-09 13:11 emanlee 阅读(1436) 评论(0) 推荐(0)
摘要:use Time::HiRes qw(time);use POSIX qw(strftime);my $t = time;my $date = strftime "%Y%m%d %H:%M:%S", localtime $t;$date .= sprintf ".%03d", ($t-int($t) 阅读全文
posted @ 2014-07-16 15:02 emanlee 阅读(2679) 评论(0) 推荐(0)
摘要:my $filename='/tmp/tmp.txt';open my $fh, '>', $filename;my $fd = fileno $fh;print readlink("/proc/$$/fd/$fd"); 阅读全文
posted @ 2014-07-15 13:46 emanlee 阅读(277) 评论(0) 推荐(0)
摘要:Perl File Handling: open, read, write and close files # Opening files Solution 1: Opening a file in perl open FILE, "filename.txt" or die $!; # read o 阅读全文
posted @ 2014-07-15 08:32 emanlee 阅读(1367) 评论(0) 推荐(0)
摘要:1.首先安装 windows 下的 perl 环境这里使用 active perl,选择最新版本 5.16.1下载地址:http://www.activestate.com/activeperl/downloads文件名:ActivePerl-5.16.1.1601-MSWin32-x86-2961 阅读全文
posted @ 2014-05-18 08:08 emanlee 阅读(1367) 评论(0) 推荐(0)
摘要:引用 引用一律声明为标量类型(即$开头的命名变量),使用\运算符取引用 对引用变量的修改等同于对引用指向实际数据的修改 取标量变量引用:my $scalar_r = \$scalar; 取列表的引用:my $array_r = \@array; 取哈希的引用:my $hash_r = \%hash; 阅读全文
posted @ 2012-08-18 22:43 emanlee 阅读(17609) 评论(3) 推荐(1)
摘要:你是否觉得Perl中关于模块的文档有些难懂?好的,这里有一个世界上最简单的模块,它将用于展示(demonstrate)Exporter模块所有的特性,另外还有一段使用这个模块的脚本。同时,我们也会给出一个有关于@INC的简短说明,最后,还要讲一下有些关于using warnings和use模块的使用 阅读全文
posted @ 2012-08-15 23:38 emanlee 阅读(9333) 评论(1) 推荐(0)
摘要:Linux使用CPAN模块自动安装 安装前需要先联上线,并且要取得root权限。 perl -MCPAN -e shell获得帮助 cpan>h 列出CPAN上所有模块的列表 cpan>m 根据关键字在CPAN上查找某个模块: cpan[1]> i /scws/ 安装模块 cpan>install  阅读全文
posted @ 2012-08-11 17:48 emanlee 阅读(23242) 评论(0) 推荐(0)
摘要:Eclipse安装Perl EPIC插件,在Eclipse中开发Perl项目 前提: 已经安装了 Eclipse,Java,Perl(例如 ActivePerl)。 步骤: 启动Eclipse,Eclipse中, 选择 Help 菜单 选择 Software Updates... 菜单项,或者,选择 阅读全文
posted @ 2012-08-11 15:41 emanlee 阅读(12208) 评论(1) 推荐(2)
摘要:Perl命令行应用介绍 perl –help 显示以下的帮助信息。 -0 规定记录分隔符 -a 与 -n 或者 -p 一起使用, 负责打开自动拆分模式, 用于对空白字符进行隐式拆分, 并将字段放入数组 @F 中, 例如: date | Perl -ane 'print "$F[0]\n"; -c 只 阅读全文
posted @ 2012-01-13 18:40 emanlee 阅读(1258) 评论(0) 推荐(0)
摘要:查看版本信息 perl -version 查看详细的版本信息 perl -V 阅读全文
posted @ 2012-01-13 18:22 emanlee 阅读(7538) 评论(0) 推荐(1)
摘要:Perltidy is a Perl script which indents and reformats Perl scripts to make them easier to read. If you write Perl scripts, or spend much time reading 阅读全文
posted @ 2011-11-22 21:22 emanlee 阅读(719) 评论(0) 推荐(0)
摘要:$- 当前页可打印的行数,属于Perl格式系统的一部分 $! 根据上下文内容返回错误号或者错误串 $” 列表分隔符 $# 打印数字时默认的数字输出格式 $$ Perl解释器的进程ID $% 当前输出通道的当前页号 $& 与上个格式匹配的字符串 $( 当前进程的组ID $) 当前进程的有效组ID $* 阅读全文
posted @ 2011-11-21 09:33 emanlee 阅读(2123) 评论(0) 推荐(0)
摘要:getopts的使用问题 #!/usr/bin/perl #execute ABC.pl -s 999 -g -t use Getopt::Std; getopts('s:t:g:',\%opts); foreach my $key ( keys %opts){ print $key,"-->;", 阅读全文
posted @ 2011-11-20 10:06 emanlee 阅读(3979) 评论(0) 推荐(0)
摘要:现象: Eclipse IDE for Java Developers Version: Helios Service Release 1,已经安装了epic和padwalker。perl环境装的是activePerl。没有手动设置过系统的参数和Eclipse的参数。 可以正常Run,但是不能Deb 阅读全文
posted @ 2011-11-13 23:12 emanlee 阅读(1963) 评论(0) 推荐(0)