ファイルハンドルの渡し方

CGIアップロード関連ライブラリのテストコード作成中に、ふと悩んだ。

open(IN, '〜〜〜〜')とか
open(CMD, 〜〜〜〜〜 |')とかいつもやっているけど、
そのファイルハンドルを関数に渡すときってどうやるんだっけ…？

ラクダ本全部読んでないので（この時点で駄目）、索引から探そうと思ったけど見つからず…
func()とかやっても当然中身が展開されるので駄目…

googleしてたら見つかったのででめも。

my $fh;
open($fh, 'cat ../file3/src |')  or die $!;
$lcl->upload($fh, '../file3/dst');
close($fh);

初めての言語は日々発見があって楽しいなぁ。