[問題] 如何將檔案指標傳入副函式

[windincloud (雲淡風輕)]

想問一下要如何將檔案指標傳入副函式

之前在PHP寫好的一隻程式想移植到perl上

其中php可以傳入檔案指標
ex: $file=fopen($path,"r");
    $num=get_num($file);

不知道perl有沒有這樣的寫法?

今天try了一下
無法成功

open FILE,$path;
$num=get_min();
print $num."\n";

sub get_min
{
        my $line;
        my $FILE=$_;
        while($line=<FILE>)
        {
                ........;
                ........;
        }
}
有哪位大大可以指點一下嗎?
感謝~

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.132.58.102