Discussion :

[sorilazer]

Salut tt le monde.

Je suis entrain de developper une appli en perl version4 Une version qui ne veut presque rien comprendre bof
Maintenant j'ai un soucis je ne sai pas comment transferer un fichier par ftp??
Si quelqu'un pour me donner une solution. Urgent!!!!

[sorilazer]

En faite j'ai trouvé ce code sur le net, mais il me semble que perl4 ne connait pas la biblio NET::FTP.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
use NET::FTP;      
$FTP_HOST= "host"; 
$FTP_USER = "user";
$FTP_PASSWORD = "pass";
$FTP_REP_DISTANT= "/path/to/";
$filename = "myFile"; 
$ftp = Net::FTP->new($FTP_HOST, Debug => 0)
   or die "Cannot connect to $FTP_HOST: $@";
$ftp->login($FTP_USER,$FTP_PASSWORD)
   or die "Cannot login ", $ftp->message;
$ftp->put($filename)
   or die "WARNING:: Erreur lors de l'envoi du fichier\n", 
$ftp->message; 
$ftp->quit;

Est ce un problem venant de perl4? ou un beug dans le code??

[Woufeil]

Bonjour,

Et bien, Perl 4 ne supporte pas la POO, et Net::FTP l'utilise... Donc le problème vient bien de Perl 4 (je n'ai pas regardé le code, donc il est peut être faux aussi)

[sorilazer]

malheurement ma kestion n'a ete abordé dans la FAQ. en plus j'ai des contraintes par rapport à perl4 que j'utilise. L'entreprise l'impose.
Je demande maintenant si on peut contourner le probleme puisque perl4 pas n'accepte la POO.


Pas tjr resolu, je suis a la recherche. j'ai

[djibril]

y a vraiment pas moyen de mettre à jour le perl? Car traivailler sur une version aussi vielle de Perl est un peu dangereux!
Tu perds une grande efficacité des modules de Perl en travaillant sous perl 4

[sorilazer]

C'est un vrai probleme. l'entreprise ne veut pas mettre a jour perl. En faite je dois mettre le script perl sur des serveurs sur lesquel perl4 est installé. Ce sont de gros server unix de production, dont leur mise a jour demande d'autres dependance, donc raison pour laquelle l'entreprise m'oblige perl4.
ET OUI C CA