如何挨个对一个串里面的每个字符做处理

标量里面保存着一个串,如何对串里的每个字符做处理呢,有比下面的方法跟简洁快速的么 my $str = '....'; my @foo = split("|", $str); for (@foo) { #handle }

作者: vgra 发布时间: 06-03

文本关键字查找

举例 文本 test.log内容如下 test server; Test server ; error lock test server ; error test test server error; . . . . 以上是举例文本信息 关键字:test error...等等 不区分大小写. 目的: 找到关键字 和 关键字之后的第一个分号之间的东西 中间其它的关键字 忽略 ,在前后加上标签 关键字和分号可能不在同一行 结果: [LOG] test server; [/LOG] [LOG] Test server ; [/...

作者: sunsansheng_cu 发布时间: 06-03

小骆驼看完了

接下来看什么啊 大骆驼 ?

作者: manwrx 发布时间: 06-03

Niecza Perl 6 v6 和raukado 啥关系?

据说Niecza Perl 6 v6比rakudo快47倍 http://planetsix.perl.org/ 这两者什么关系,niecza是rakudo的下一代吗? 还是平行发展?

作者: kingwmj 发布时间: 06-03

请问如何查找一串字符中某个字符或字符串的出现次数

大家好,我是学生物的,对Perl了解的不多,现有问题想向大家请教一下。我有一条DNA序列,如下: GGATCCCCCGGGCTGCAGGAATTCGAATTAGAAAATCAAAGTATATGTTAGTTATTTAAA TTTTGAAGAAAAACGAATAGTTTTCATTATAAAAAAGTAAATGTTCGAAGTATCTTACTT CATGATATGCAAATAATAATGAAATAGAGTCTAGACAGATGAAAGCAATACATAATTGTT GAACCAAATCATAAAGAAGTAGGATAAAGATGCCCTATTACAGTTGATAATTATTAATCG TTCAGTGAACACT...

作者: sunbaofa 发布时间: 06-03

可以請教一下如何把shell script 改寫成 perl ?

#!/bin/bash echo $b echo $fileday echo $datatype # Count Daily Total History: for i in $datatype do gzcat $addToPath/PM.$b.$fileday.*.xml.gz |grep $i >> $addToPath/$i.log done # Summation Daily Total Counts: for i in $datatype do total=0 number=0 filename=$addToPath/$i.log while read line do number=` echo $line | cut -d '>' -f2 | cut -d '<' -f1 ...

作者: citiwang 发布时间: 06-02

v5.8.8如何使用say等5.10以后的新特性

使用的是centos5自带的perl5.8.8 刚学习perl。 [root@centosst perl]# perl -v This is perl, v5.8.8 built for i386-linux-thread-multi Copyright 1987-2006, Larry Wall Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5 source ki 无法使用say等新特性,如果加了use 5.01...

作者: linuxboy823 发布时间: 06-02

请问如何打包开发过程中用到的CPAN module

用perl做了个项目,其中使用了很多CPAN下载的module。开发过程中是直接安装到工作环境了,请问在release的时候一般是用什么方式将这些module一次打包进一个rpm进行安装呢? 或者有类似的工具帮忙介绍下,多谢

作者: yayapa 发布时间: 06-02

帮忙看下,下面的代码是什么意思呢

帮忙解释下GetOptions代码块 'indexdir=s' => \$indexdir, 【是什么意思呢】 use strict; use Getopt::Long; my ($indexdir, $docpath, $identifier, $lang, $help ); GetOptions ( 'indexdir=s' => \$indexdir, 'docpath=s' => \$docpath, 'identifier=s' => \$identifier, 'lang=s' => \$lang, 'help' => \$help, ); 复制代码

作者: zwrvvv 发布时间: 06-02

求教:如何在 ssh->exec() 中使用变量

#!/usr/bin/perl use strict ; use warnings; use Net::SSH::Expect; my $ssh=Net::SSH::Expect->new( host=>"ip", password=>"passwd", user=>"user" ); $ssh->login(); my $result=$ssh->exec("show gslb geo-location ip ***.***.***.*** "); print "$result\n" ; 其中show gslb geo-location ip “***.***.***.***” 引号中为变量 如何把另一个文本中的第一列(全是IP地址...

作者: yinyue0317 发布时间: 06-02