→ qrtt1:這頁的範例和你要做的東東還蠻像的, 請觀察一下 :) 12/26 15:34
推 hajimels:你這樣是直接在螢幕上print出來呀,另外養成close的習慣吧 12/26 21:08
→ hajimels:啊... 下面有人回文了,你照他那樣改應該就會寫進檔案了 12/26 21:09
推 robbor:謝謝各位指導 12/27 17:58
請問一下
要怎麼把結果寫到一個新的檔案裡
我開了NC_000964.faa檔案，找到我要的資料
最後要統整在一個新的檔案裡，
最後一直寫不出來，
請各位幫我看一下。
謝謝
#!/usr/bin/perl
# sort.plx
use warnings;
use strict;
open FILE, "NC_000964.faa" or die $!;
open File,">1234.txt" or die $!;
my $lineno = 1;
while (<FILE>) {if (/^>/){
print $lineno++;
print ": $_">;
}
}
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.127.160.142