получаю хэндл таким образом
$inuh=$in->upload('fname');
передаю в модуль
$fm::filehandle=$inuh; #fm - модуль fm.pm
в модуле функция
open(uh,">qwe.txt");
while(<$filehandle>)
{
print uh;
}
close(uh);
сразу говорю что всё что тут я написал это работает в отдельном uh.pl, так что с правами и т.п. ошибки не принимаються!!! дальше ещё не принимаються ответы на то что модель не работает, модуль прекрасно работает.
сам вопрос в том как передать хэндл файла в модуль, хотя бы в модуль уж не в функцию модуля. по моему мнению, проблема как раз в том что хэндл не передаёться и создаёться файл длинной 0. жду размышлений и ответов :)