> I'm trying to use passive mode (PASV) with mirror (2.8),
> mirror.pl sets &ftp'use_pasv according to passive_ftp=(yes|no),
> but ftp.pl coming with perl5 doesn't seem to use this value.
>
> There's no PASV command being sent, there's also no such line
> in ftp.pl ...
>
> Anyone who got a newer ftp.pl wanting to share ?
> Also hints how to expand ftp.pl are welcome.
I can't do diff of it, but the fix (as I recall) was quite
easy. Propably following:
In the ftp.pl with that mirror package,
around line 1280, you need to add following:
#
# we MUST do a listen before sending the port otherwise
# the PORT may fail
#
listen( S, 5 ) || die "listen";
+ if ($use_pasv) {
+ return 1;
+ }
&send( "PORT $a,$b,$c,$d,$hi,$lo" );
(this is *not* a diff, just edited cut&paste from another xterm..)
> Steffen
> Steffen Grunewald = steffen(at)gfz-potsdam.de = fax +49-331-288-1266
/Matti Aarnio <[EMAIL PROTECTED]>
-
To unsubscribe from this list: send the line "unsubscribe linux-net" in
the body of a message to [EMAIL PROTECTED]
