今天遇到个问题，如下ABC：ABC为递增号码，例：123、234...678；如写一个正则式匹配一下呢？我写了好一会都没有搞定。

本帖最后由shilin320于2010-09-2020:59编辑我是在windows中用ActivePerl（5.10.1）。安装了bioperl，运行了如下代码没有异常。#!c:\perl\bin\perl-wuseBio::Perl;exit;复制代码但是

本帖最后由天野飘于2010-09-2016:37编辑我想抓监控某块网卡上有没数据包，如果不用alarm，则可能在执行抓包时程序阻塞。但是这样引起一个问题，就是在没有流的情况下killall掉的tcpdump，可能有fd没关闭，这是个后台程序，fd可能会非常多？大家有没好点子啊？我没辙了。顺便说下，用system执行tcpdump也不行。subtcpdump_receive_i

my@ip1;my%hash1;my$i=1;while($i<254){  $ip1[$i]="172\.16\.64\.$i";  #print"$ip1[$i]=abc\n";      $i++;}#exit;print$#ip1."\n";

有两列table格开的文件，其中/表示或的意思，如MFSD3/LOC113655表示MFSD3或LOC113655，MFSD3/LOC113655位于第一列，第二列不存在/分开的名称LDHA  ZNFX1GABPB2  MFSD3HDHD2  PNPOSTYXL1/DUSP24  PLEKHA3P

我现在要比较两个CSV文件，我是利用Text::CSV_XS模块来比较的我的代码如下#!/usr/bin/perluseText::CSV_XS;my$csvfile="file1.csv";my$newfile="file2.csv";open

几年前写的旧代码,好久不用了，现在还能用。此代码既能能用来做好事也能用来做坏事，本来用来给老婆查论文资料的，结果她用不惯命令行的东西，就算了。做坏事就不用我说了吧。配置文件如下格式##########################=任意区域#countryTD=乍得#countryGI=直布罗陀#countryCL=智利#countryCF=中非共和国#countryCN=中

WHOKNOW  TELLME!3KS!!

在学习return的操作中，书中有一处例题说子程序&which_element_is用来找出betty在数组@names中的索引值。my@names=qw/willwiykdbetty/;my$result=&which_element_is("betty",@names);subwhich_element_is{  &nb

找出数组中不重复的元素，以下是代码：#!/usr/bin/perl-wusestrict;my@array=('a','b','c','a','d',1,2,5,1,5);