[問題] 初學者問題 關於my 急 求解惑 謝謝

看板Perl作者 (hippo泡)時間10年前 (2015/04/06 19:06), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串1/2 (看更多)
先附上程式片段 while (my $row = <$fh>) { chomp $row; my $reverseRow = reverse_complement($row); print "$reverseRow\n"; } 這樣子print是OK的 但 while (my $row = <$fh>) { chomp $row; my $reverseRow = reverse_complement($row); } print "$reverseRow\n"; 這樣子無法 就算改成 my $reverseRow = ''; while (my $row = <$fh>) { chomp $row; my $reverseRow = reverse_complement($row); } print "$reverseRow\n"; 也沒辦法印到while裡面的東西 而 $reverseRow = ''; while (my $row = <$fh>) { chomp $row; $reverseRow = reverse_complement($row); } print "$reverseRow\n"; 也是會出錯 請問要怎樣讓print在while迴圈外呢? 我是想在while把所有的字串集合成一個變數 再把那個變數印出 求解 拜託T.T -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.231.192.137 ※ 文章網址: https://www.ptt.cc/bbs/Perl/M.1428318378.A.82D.html
文章代碼(AID): #1L8cYgWj (Perl)
文章代碼(AID): #1L8cYgWj (Perl)