Perl代码该怎么写?有个1.txt文件内容如下:ABCxxxxxxxxxxxxxxxxxxxxxxxxxxxDEFaaaaaaaaaaaaaaaaaaaGHIbbbbbbbbbJKLcccccccccccccccccccc大写字母是ID名,名称不一.下面小写字母ID对应的序列,序列长度不一.如何提取ID以

来源:学生作业学帮网 编辑:学帮网 时间:2024/04/29 09:41:16

Perl代码该怎么写?
有个1.txt文件内容如下:
ABC
xxxxxxxxxx
xxxxxxxxxx
xxxxxxx
DEF
aaaaaaaa
aaaaaaaa
aaa
GHI
bbbbbbbbb
JKL
cccccccccc
cccccccccc
大写字母是ID名,名称不一.下面小写字母ID对应的序列,序列长度不一.
如何提取ID以及对它对应的序列?例如我要找ABC时,就显示:
ABC
xxxxxxxxxx
xxxxxxxxxx
xxxxxxx

my $file = '1.txt';
my $key = shift @ARGV;
my $isfind =0;
open HANDLE, $file;
while(<HANDLE>){
   my $line = $_;   
   if($line =~ /$key/){
     $isfind = 1;
   }elsif($line =~ /[A-Z]+/){
     $isfind = 0;
   }
   
   if($isfind ==1){ 
      print $line;
   }
}

close HANDLE;

Perl代码该怎么写?有个1.txt文件内容如下:ABCxxxxxxxxxxxxxxxxxxxxxxxxxxxDEFaaaaaaaaaaaaaaaaaaaGHIbbbbbbbbbJKLcccccccccccccccccccc大写字母是ID名,名称不一.下面小写字母ID对应的序列,序列长度不一.如何提取ID以 Perl代码该怎么写?有一个文本文件1.txt,有60行,格式如下x aaaaaaaaaaax bbbbbbbbbbb.y aaaaaaaaaaay bbbbbbbbbbby cccccccccccccy dddddddddddy eeeeeeeeeeey ffffffffffffffffffffff.y开头序列的数量是 x开头的3倍,即x开头的有15 bat move 命令一行一个“move”移动两个文件代码怎么写?比如说我有a.txt 和b.txt ,需要移动到文件夹1里边,只能用一个move写在一行内move a.txt b.txt 1 这条代码实现不了,我知道可以move a.txt 1move b.txt perl编程求助,怎么把数字转换成编码?在1.txt文件中有几百行数字,数字没有规律,格式如下:72 37 25 41 2 15 6 17 2825 28 12 13 15 18 68 7 15...等等我现在要把他们转换成01编码该怎么转换?转换法则如下 用C语言替换txt文件里的某一个单词怎么写,比如我有一个a.txt文件,内容如下(省略符号代表省去的内容,不用管):...right,youaremy world!...我想把you替换成they,完整的代码怎么写, 用perl查一个词表中的词在另一个文档中出现的,频率,输出频率表,并列出该词出现的索引行.我现在有一个词表文件,里面有十几个词,还有一篇已经分好行的一句一句的文章,要用perl写个程序算 在 for 循环里计算得到了许多数据 m1,m2,m3,m4,m5.一次循环得到一个mk,它们都是有很多数据组组成的数据我该用什么命令才能把它们保存到同一个txt文件中呢,代码怎么写? Perl编程问题,怎样替换对应的数字或者字符串?我有两个文件1.txt和2.txt.在1.txt中,有2列,第一列是元素名字,第二列是它对应的数字,但是有几百行.格式如下:a(3)xvsd 1bfsoek 2arg 3tya 4.等等在2.txt中 Perl如和生成这种格式的序列?有三个文本文件,里面分别有不同的元素若干个,分别代表了生成序列前三位的可能性.1.txt中有:aac abc acc adc .2.txt中有:bxa bxab byc bssxd .3.txt中有:efg hij lmop adc .现 易语言判断1.txt内某段数字,比如123456出现的次数该怎么写啊?读取文件1.txt里面的内容,然后判断这串数字123456在1.txt里面的个数如果超过3就执行:子程序2如果个数没超过3就执行:子程序3这个 perl中统计单词出现频率的一段代码,大家帮我看看我那里错了?/usr/bin/perl open(MY,1.txt);while(){while(/fred/){$words {$1}++;} }foreach $_ (keys %words){print $_$words{$1} ;}我的txt文本是fredbarneyfreddinowilmafred 看到你的百度知道,有个问题希望能帮我一把,写一段perl.在文件中的提取名称:.在这样的文件中,把“ABC”前面的名称“123”和“234”提取到一个新文件中,“345”不用提取到新文件中. @echo off for %%a in (*.txt) do decrypt %%a %%a pause 怎么用它同时解密多个TXT文件? Matlab批量读取一个文件夹里的txt文件现在有一个文件夹 里面有50个左右的txt文件 每个文件大概三万行 两列 第一列是字符串 第二列是浮点数字我只需要读第二列现在我想写一个.M文件 批量读 后缀是txt或TXT 有哪些文件 Matlab 已知有一个采集了6s的600个数据的txt,怎么求其拟合函数?会的可以索要txt文件.其实就是桡动脉脉搏波的数据,应该用三角拟合就行,会的帮个忙 如何用perl读入一个文件,计算文件中各个单词的出现频率,再输出用perl读入一个文件shizegengo.txt,计算文件中各个单词的出现频率,然后再按左边-单词,右边-出现次数perl -w# frequency%count;open TERM, java读取txt中的两点坐标计算距离有一txt设为xyz.txt,里面含有A,B的xyz坐标,问要读该txt文件并计算出AB距离,求解!谢谢!