作者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)