小小Mavis 于 2010-09-05 15:33:47发表:
8# alick 这些文件都很大，不好贴上来，我找人帮忙看了一下，问题也差不多解决了。谢谢大侠，呵呵。。。以后要是有什么问题，还得麻烦你了，呵呵。。。
alick 于 2010-09-05 13:18:37发表:
但是我不知道EXON，HG这些文件的内容～
alick 于 2010-09-03 14:20:53发表:
给的代码不够，可能是$i的值超过了@name的索引（下标）的范围了吧
小小Mavis 于 2010-09-03 10:23:37发表:
2# alick 谢谢！ 再问一下高手： 我的代码里有两个独立的while循环，第二个循环中要用到第一个循环的结果（比如一个数组@name），我在循环二中用$name[$i]，为什么提示红色那一行有未初始化的值呢？ foreach $i ($var2[1]-1..$var2[2]-1) { if ($name[$i]==1) }
dqshur 于 2010-09-03 08:30:41发表:
楼上高手
alick 于 2010-09-02 19:15:52发表:
用substr。 如[code]my $sub = substr $s, 2, 4; [/code]参考perldoc -f substr
小小Mavis 于 2010-09-05 15:33:47发表:
8# alick
这些文件都很大，不好贴上来，我找人帮忙看了一下，问题也差不多解决了。谢谢大侠，呵呵。。。以后要是有什么问题，还得麻烦你了，呵呵。。。
alick 于 2010-09-05 13:18:37发表:
但是我不知道EXON，HG这些文件的内容～
alick 于 2010-09-03 14:20:53发表:
给的代码不够，可能是$i的值超过了@name的索引（下标）的范围了吧
小小Mavis 于 2010-09-03 10:23:37发表:
2# alick
谢谢！
再问一下高手：
我的代码里有两个独立的while循环，第二个循环中要用到第一个循环的结果（比如一个数组@name），我在循环二中用$name[$i]，为什么提示红色那一行有未初始化的值呢？ foreach $i ($var2[1]-1..$var2[2]-1) {
if ($name[$i]==1)
}
dqshur 于 2010-09-03 08:30:41发表:
楼上高手
alick 于 2010-09-02 19:15:52发表:
用substr。
如[code]my $sub = substr $s, 2, 4; [/code]参考perldoc -f substr