方法一、手工安装的步骤 从CPAN下载了DBI模块1.13版的压缩文件DBI1.13.tar.gz,假设放在/usr/local/src/下。 cd /usr/local/src 解压缩这个文件: tar xvzf DBI1.13.tar.…
文章
全部技术文章,按发布时间倒序排列
没有使用chomp: !/bin/perl print "Please input an string and a number by order!n"; $the_string=<; $the_numb=<; print "The res…
pop 操作将数组的最后一个元素取出并返回: @array=5..9; $fred=pop@array; $fred 得到 9,@array 现在为(5,6,7,8) $barney=pop@array; $barneygets8,@arr…
!/bin/perl print "please input some lines,then press Ctrl+Z. n"; chomp@s=<STDIN>; print "1234567890"x 3 ."n";做为输出结果的一个标尺 foreac…
!/bin/perl @number=qw/5 10 15 3 2 4 8 6 /; my @descending =sort {$a <=> $b} @number;这里$a=5,$b=10,因为$a在前,perl得到的结果是小数在前,也就是升序排…
window下读取某个文件,格式是: open filehand,"路径e.g:d:\data.txt"; 然后将打开的内容赋值给一个变量: $protein=; 附:一个读取蛋白质序列的程序。 !/bin/perl open PROTEI…
1. chop和chomp函数 两个函数都以字符串作为参数,并去除其末尾最后一个字符。区别是,无论最后一个字符是什么,chop都会去除,并在返回值中返回;而仅当字符串最后一个字符与特殊变量$/保存的字符一样时,chomp才会将其去除。默认情…
1.Perl数组1: 1 初始化数组 @array = "stringA" , "stringB" , "stringC" ; 2 使用负索引循环检索 print $array1; 输出索引为1 + 3 % 3 = 2 的 stringC…
Net::SSH2是libssh2 http://www.libssh2.org函数库的一个接口,支持SSH2协议。两种使用方法如下: 方法一: $chan2 = $ssh2channel; $chan2blocking0; print $…
在perl中,读写文件都必须使用句柄,通常情况下,我们在open的时候就会指定,但是如果我们将一个句柄传递给函数数,那就必须使用句柄变量了,那么在perl中如何使用变量做句柄呢?下面我们通过这个例子来了解一下: !/usr/bin/perl…