Perl NET::Ftp

Здравствуйте. Проблема такая: когда на фтп пытаюсь положить файл ($ftp->put($file, $file1)), то скрипт создаёт на сервере файл $file1, но ничего не записывает. Испытывал и в binary, и без него. Выдаёт Net::ftp=GLOB(0x8343c30) error. В чём может быть проблема? Заранее спасибо