Do you have a question? Post it now! No Registration Necessary.  Now with pictures!


I have a problem with ftpconnection via proxy.

|--------------------|     |------|    |------|
|local mit ftp client| ->  |proxy | -> |host  |
|--------------------|     |------|    |------|

The perlscript looks als follows:    (i am using Linux)
#!/usr/local/bin/perl -w
use strict;

use Net::FTP;

my $TRUE = 1;
my $FALSE = 0;

my $prox="www-proxy.xxxxxxx:8080";
my $host="xxxxxx";

my  $ftp = Net::FTP->new($host,Firewall => $prox,    #thid is line 15
                                                Debug => 1,
                                                Timeout => 1000,
                                                Passive => $TRUE) or
die "OOps\n";



my $result = $ftp->put("hallo","deldies.ftpt");


This script writes folloing output:

Net::FTP>>> Net::FTP(2.72)
Net::FTP>>>   Exporter(5.57)
Net::FTP>>>   Net::Cmd(2.24)
Net::FTP>>>   IO::Socket::INET(1.27)
Net::FTP>>>     IO::Socket(1.28)
Net::FTP>>>       IO::Handle(1.23)
Net::FTP: Unexpected EOF on command channel at ./ftptest.pl line 15

The connection works with "TotalCommnder" on a windows computer. The
connection and the filetransfer are working. The proxy is the same.

I would be glad. if anybody could help me to acomplish it with the
script on Linux.

Thanks in advance


Site Timeline