作者markpci (markpci)
看板Perl
標題[問題] 比較大小
時間Fri Jan 25 14:14:00 2008
我的文字檔內容為:
weff 0.465
ergsf 0.659
dsa 0.658
： ：
： ：
： ：
我要將其最大值取出~然後再與每一列相除，
我只寫到比較大小時就卡住了~以下是我的程式碼:
open data, "<test.txt" || die $!;
foreach (<data>) {
chomp;
$n=0;
@dd=split/\t/, data;
$f=$ll[0];
$n=0;
if ($n < @dd[1])
{
$max=@dd[1];
print "$max \n";
}
print "@dd[1] \n";
}
close data;
請幫我看一下我的程式是那裡出錯了?怎麼寫才對???
還有接下來該怎麼做呢?
perl新手~煩請大家指教~謝謝....
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.70.83.82
1F：推 Evenni:你在if上面強迫指定$n=0,所以每次if都會成立,$max會等於 01/25 15:06
2F：→ Evenni:最後一筆資料 01/25 15:08
※ 編輯: markpci 來自: 210.70.83.82 (01/25 15:47)