Pb avec Net::FTP quand utilise $ftp->port()
Le
Onishin
Voila je vas unclient qui liste les ftp ! Et comme y a des ftp dans des dmz
je peux pas utiliser le mode PASV et quand je lance la commande port avec ip
exterieur et un des port nater
re envoie une commande port avant de lister comletement aleatoir pour moi se
qui fait que le list echoue
$ftp->port("$cmdport");
$tailledir{$tmpdir} = 0 ;
my $taille = 0;
my $entry_ref = parse_dir($ftp->dir());
Net::FTP=GLOB(0x2212678)>>> CWD /
Net::FTP=GLOB(0x2212678)<<< 250 OK. Current directory is /
Net::FTP=GLOB(0x2212678)>>> PWD
Net::FTP=GLOB(0x2212678)<<< 257 "/" is your current location
Net::FTP=GLOB(0x2212678)>>> PORT 82,64,189,181,15,148 <--
la mienne
Net::FTP=GLOB(0x2212678)<<< 200 PORT command successful
Net::FTP=GLOB(0x2212678)>>> PORT 82,64,189,181,16,119
<--Celle qui dois pas exister
Net::FTP=GLOB(0x2212678)<<< 200 PORT command successful
Net::FTP=GLOB(0x2212678)>>> LIST
Net::FTP=GLOB(0x2212678): Timeout at C:\_perl\_final\final2.pl line 87
je peux pas utiliser le mode PASV et quand je lance la commande port avec ip
exterieur et un des port nater
re envoie une commande port avant de lister comletement aleatoir pour moi se
qui fait que le list echoue
$ftp->port("$cmdport");
$tailledir{$tmpdir} = 0 ;
my $taille = 0;
my $entry_ref = parse_dir($ftp->dir());
Net::FTP=GLOB(0x2212678)>>> CWD /
Net::FTP=GLOB(0x2212678)<<< 250 OK. Current directory is /
Net::FTP=GLOB(0x2212678)>>> PWD
Net::FTP=GLOB(0x2212678)<<< 257 "/" is your current location
Net::FTP=GLOB(0x2212678)>>> PORT 82,64,189,181,15,148 <--
la mienne
Net::FTP=GLOB(0x2212678)<<< 200 PORT command successful
Net::FTP=GLOB(0x2212678)>>> PORT 82,64,189,181,16,119
<--Celle qui dois pas exister
Net::FTP=GLOB(0x2212678)<<< 200 PORT command successful
Net::FTP=GLOB(0x2212678)>>> LIST
Net::FTP=GLOB(0x2212678): Timeout at C:\_perl\_final\final2.pl line 87
Poser une question
Moi pas comprendre quoi toi écrire.
Comme certain server Ftp sont accesible que sur le port 21
Le mode Pasv ne marche pas et c'est normal vu qu'il sont dans des DMZ
Donc seul solution utiliser le mode Port
Comme moi aussi je suis derriere un routeur
J'ai natter des port une 10 pour etre accessible de l'exterieur
J'envoie la commande PORT au server marche parfaitement !
Et le perl dans mon dos r'envoies une commande PORT elle avec un port
erronee par raport a ma config reseau alors que c'etait pas necessaire
Donc ma question Comment definir la plage de port que net::ftp peut utilise
et l'ip exterieur
Ou comment l'empecher de reenvoyer une commande Port qui sera errone mais
utiliser la mienne
"Laurent Wacrenier" news:
Personne a la reponse toutjours pas trouver !
onishin
1 - Lire la doc !?!
If for some reason you want to have complete control over
the data connection, this includes generating it and calling
the "response" method when required, then the user can use
these methods to do so.
**** However calling these methods only affects the use of the
methods above that can return a data connection. They have
no effect on methods "get", "put", "put_unique" and those
that do not require data connections. ****
port ( [ PORT ] )
Send a "PORT" command to the server. If "PORT" is
specified then it is sent to the server. If not, then a
listen socket is created and the correct information
sent to the server.
2 - Utiliser 'ssh' !?!
etc.
--
Paul Gaborit - Perl en français - Remove '.OOO' from e-mail address - Supprimez '.OOO' de l'adresse e-mail