howto write perl script using ncftp

['chris']

hi

howto write perl script using ncftp and ncftp commands to transfer files ?

# ncftp -u user -p password -P 21 192.168.0.1
# cd /tmp
# put file.txt
# quit

http://www.ncftp.com/ncftp/doc/faq.html

I must use perl and ncftp in my case and cannot use Net::FTP, shell script or else.

greetings
chris

[H.Merijn Brand (procura · Accepted solution]

Can you explain why Net::FTP is not an option?

--8<---
open my $ncftp "| ncftp -u user -p password -P 21 192.168.0.1";
print $ncftp "cd /tmp\n",
"put file.txt\n",
"quit\n";
close $ncftp;
-->8---

This has no error checking.

Enjoy, Have FUN! H.Merijn

['chris']

thanks !

but how can work with error checking ?

[H.Merijn Brand (procura]

using Net::FTP and Net::Netrc (presuming you don't want to use Net::FTP because of user/password issues).

It's very hard ti do error checking on external programs (helper programs), mostly because you have problems in knowing how to synchronize. The error on cammand 1 may come after command 2 has already been sent.

Enjoy, Have FUN! H.Merijn