[問題] 比較大小

[markpci (markpci)]

我的文字檔內容為:
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
推 Evenni:你在if上面強迫指定$n=0,所以每次if都會成立,$max會等於
→ Evenni:最後一筆資料
※ 編輯: markpci         來自: 210.70.83.82         (01/25 15:47)