Programmation Perl sous Windows

Version imprimable

Voir 40 message(s) de cette discussion en une page

25/05/2006, 10h50
ArHacKnIdE

Programmation Perl sous Windows

Bonjour à Tous,

M'interessant au Perl il y a peu de temps, je me demande si l'on peut programmer en Perl sous Windows :? ?

Il faut inclure des librairies, des .dll :?

Merci pour tout eclaircissements...
25/05/2006, 12h10
djibril

je te suggère de lire la FAQ et les cours qu'on a redigé confère ma signature :lol:
25/05/2006, 14h38
ArHacKnIdE

Merci, j'aurai pu y penser avant :oops:

Alors maintenant j'ai une question perl :

Comment on définit une connexion FTP en Perl ? :?

$ftp=...

Merci

EDIT : Avec le Bloc-Note, je peux faire du Perl ? :?
25/05/2006, 15h28
ArHacKnIdE
En fait j'ai ma fonction connect :
Code:

1 2 3 4 5 6 7 8 9 sub connect { my ($login,$passwd,$serveur)=@_; use Net::FTP; $ftp=Net::FTP->new($serveur, Timeout => 30) or die "connexion impossible.\n"; $ftp->login($login,$passwd) or die return (2); }
Puis je l'apelle comme ça plus loin :

Code:

connect($login,$passwd,$serveur);

Et j'ai une erreur :

Code:

Too many arguments for connect, near "$serveur)"

Ou est l'erreur :? ?

Merci
25/05/2006, 16h53
Jedai
connect est l'une des fonctions de base de Perl, ton connect() ne l'a pas remplacé (pour X ou Y raison), et le connect() de Perl ne prend pas 3 arguments. Voilà pourquoi.

Par ailleurs...
Code:

1 2 die return (2)
Je ne sais pas ce que tu voulais faire, mais ça ne le fait sûrement pas !!

--
Jedaï
25/05/2006, 16h57
Jedai

Citation:

Envoyé par ArHacKnIdE

EDIT : Avec le Bloc-Note, je peux faire du Perl ? :?

Tu peux... Si tu aimes souffrir ! Va voir le sujet épinglé en haut du forum qui traite des éditeurs de texte, tu y trouveras bien ton bonheur. Pour ma part je suis un fervent supporter de SciTE, simple à installer, simple à utiliser, disponible sur Windows ou Linux et bourré de fonctionnalité. :D

--
Jedaï
25/05/2006, 17h09
ArHacKnIdE

Merci pour les infos mais alors il me faut quoi pour que mon code marche :?

En fait je voudrai faire un service par ligne de commande, d'accès à un serveur FTP :?

J'ai trouvé ConTEXT sur le net comme editeur :?

Merci
26/05/2006, 02h54
Jedai

Citation:

Envoyé par ArHacKnIdE

Merci pour les infos mais alors il me faut quoi pour que mon code marche :?

En fait je voudrai faire un service par ligne de commande, d'accès à un serveur FTP :?

J'ai trouvé ConTEXT sur le net comme editeur :?

Merci

Pour que ton code marche ? Et bien corriger les erreurs que je t'ai pointé serait un premier pas...

--
Jedaï
26/05/2006, 08h28
ArHacKnIdE

Merci! J'ai supprimé le die return (2), je n'ai plus ce problème :D

Mais j'en ai d'autres :?

Il me sort un problème de "typo" sur une variable :?

Merci
26/05/2006, 08h50
Mr6

tu pourrais être un poil plus précis ? mets-nous le message d'erreur exact ainsi que le bout de code qui fait raler perl stp ;)

@+
Mr6
26/05/2006, 09h06
ArHacKnIdE

Voilà le message d'erreur : (faut que je le recopie à la main chaque fois :D)

Code:

Name "main::ma_variable" used only once: possible typo at mon_fichier.pl line 20.

Merci
26/05/2006, 09h08
Mr6

et à la ligne 20, tu n'aurais pas oublié un "$" devant "ma_variable" ?

Non, mais en fait j'ai ça pour ouvrir un fichier mais c'est pas de moi :?
Code:

1 2 3 4 5 6 7 8 9 open ((F1), $nom_fichier_texte); #ligne 20 while (defined(<F1>)) { $tmp=<F1>; chomp $tmp; $tab_pass[$x]=$tmp; $x++; } close (F1);
C'est correct comme code :?

26/05/2006, 10h55
Mr6

regarde la faq, tu as ca qui devrait t'intéresser ;)
26/05/2006, 11h02
ArHacKnIdE

Oui merci mais je suis une quiche en Perl :?

Les codes sont pas de moi et je n'y comprend pas grand chose :?

En fait il me faudrait ouvrir un .txt et le lire ligne par ligne :?

Merci
26/05/2006, 11h56
jeje.r

Citation:

Envoyé par ArHacKnIdE

Oui merci mais je suis une quiche en Perl :?

Les codes sont pas de moi et je n'y comprend pas grand chose :?

En fait il me faudrait ouvrir un .txt et le lire ligne par ligne :?

Merci

open(FIC,"< tonfichier.txt") ;
while ($ligne = <FIC>){
print $ligne;
}
close(FIC) ;
26/05/2006, 13h10
ArHacKnIdE

Merci je vais voir ce que je peux faire avec ça :D
26/05/2006, 13h30
jeje.r
Tu peux aussi faire comme ca:
Code:

1 2 3 4 5 6 open(FIC,"<tonfichier.txt") or die "pb ouverture fichier"; foreach(<FIC>) { print $_ ; }
Mais c'est la base, je te conseille de regarder de plus près les 3 parties de cours : http://perl.developpez.com/cours/
Ils vont a l'essentiel, j'ai appris les bases du perl en une semaine avec ca...
26/05/2006, 13h40
etranger

il ne faut egualement pas oblier de fermer le fichier :

Code:

close FIC;

Mais si c'est seulement pour afficher le fichier tu peu tou simplement faire un:

Code:

print <>;

et ensuite passer le nom du fichier que tu veut afficher en ligne de commande.

Pour apprendre perl, un des meilleurs livre est surement "Introduction a perl" http://perl.developpez.com/livres/, avec ce livre, tu commance avec de bonnes bases .
26/05/2006, 16h16
Jedai

Citation:

Envoyé par ArHacKnIdE

Voilà le message d'erreur : (faut que je le recopie à la main chaque fois :D)

Code:

Name "main::ma_variable" used only once: possible typo at mon_fichier.pl line 20.

Merci

Ceci n'est pas un message d'erreur, c'est un avertissement (un warning) qui te dit que tu n'as utilisé ce nom de variable qu'une seule fois, ce qui indique que soit tu n'as pas besoin de cette variable, soit tu as oublié de faire quelque chose avec, dans tous les cas il y a une erreur dans ton programme, mais ce n'est pas une erreur de syntaxe, donc perl exécutera tout de même ton script.

--
Jedaï

Voir 40 message(s) de cette discussion en une page