00问答网
所有问题
当前搜索:
perl读取数组内字符出现次数
perl
中怎样统计
数组
中不同长度
字符串
的个数
答:
! /usr/bin/
perl
-w use strict;my @a=("A","G","GC","GCT","AT","AGCT","TCGU","T");my @b;my $lengths=1;for (@a){ my $len=length($_);b[$len-1] +=1;} for (@b){ print "length$lengths:$_\n";lengths +=1;} ...
Perl
文件
读取
计算字母数的题。(原题如图)?
答:
close IN;txt = join("\n",@txt);#把
数组
合并成
字符串
mw -> messageBox(-type=>"ok", -message=>"$txt",-icon=>'question');#显示结果 } exit;}
perl
如可查找一个
数组里
?
答:
查找
数组
中800到1200之间的数的
perl
程序如下
如何使用写
perl
脚本,将在
数组
a
里面
的
字符
在数组b里面的数据选出来_百度...
答:
少侠,你的
数组
定义有问题,应该是y @a=("a","b","c");和@b=("a","d","e","f");其他的好像没什么问题 望采纳 具体代码如下:use strict;my @a=("a","b","c");my @b=("a","d","e","f");print "@a\n";foreach my $a(@a){ foreach my $b(@b){ if($...
求教一个问题:
perl
语言,怎么把
字符串
每一个
字符读
到
数组里
答:
\n";} 其中:for(my $i = 0; $i < length($string); $i++){
Array
[$i] = substr($string,$i,1);} 是根据
字符串
长度,将字符逐个存入到
数组
中。for(my $i = 0; $i < @Array; $i++){ print "$Array[$i]\n";} 这个是输出字符串内容,看是否成功!测试结果是可以的 ...
perl
怎么计算
数组
中相同数字的个数
答:
while(<>){ chomp; unless(/^M/){ @tmp=split; $count{$tmp[0]}++;##统计第一列数字个数 } } print "$count{1}\n";##1的个数 你的代码没贴完 不知道到底是哪里。。
perl
怎么能把正则表达式捕获的未知个数内容依次放入
数组
?
答:
按照你的要求把正则匹配的内容放入
数组
并统计
次数
的
perl
程序如下
perl
如何打印
数组中的
一段
答:
上面的写法可以@
array
=(1..50);print @array[30..50];#或者也可以这样:@array=(1..50);for $i (30..50) {print $array[$i];}
perl
判断
数组里面
是否含有某个元素
答:
用 grep target = "def";print "Found $target" if ( grep ($target , @x) ) ; #Found def
perl
如何
读入
一个.txt文本
中的
内容,将文本里的内容放到一个
数组里
答:
楼上正解!不过
用perl
处理文件的话,
读入数组
处理效率不高 可以试着这样 open(FD, "file.txt");while(<FD>){ 对每一行($_)进行处理 } close(FD);这样在处理超大文本时, 不会占用很多内存, 又利用了读磁盘与CPU运算之间的流水作业, 可以大大提高程序效率 ...
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
字符数组和字符串数组
perl中printf输出数组
perl里怎么对数组实现一次遍历
perl怎么读取数组第几位
字符串和字符数组的区别
字符数组可以存放字符串
字符数组只能存放字符串
perl数组元素个数
perl数组去重复