[Perl Windows] Ligne de commande et nom windows long

Bonjour,

Je vais me coder un script qui parse des logs, le tout sous Windows.

Le problème c'est que comme à chaque fois, je suis ennuyé par l'appel en ligne de commande, à cause des noms long.

Donc, Oui j'ai bien installé la version WIndows de Perl.

Code:

---

1 2	perl Parse-OVH-logs.pl 'C:\Documents and Settings\caine\Mes documents\VosLogiciels.com\Logs OVH\creationlogiciel.net-22-11-2009.log.gz'

---

J'ai utiliser une ligne pour compter le nombre d'arguments:

Code:

---

1 2	print "parameters : "+scalar @ARGV+"\n";

---

Le résultat sur cet appel est 5. Il devrait être de 1. Donc, Perl ne considère pas le chemin quoté comme un seul argument.

Alors, après avoir cherché (peut ëtre mal), je fais appel aux connaisserus que vous êtes.

Merci d'avance.

La réponse est ici.

Pour ma part, je ne reproduis pas ce problème avec ma version de perl pour Windows (qui vient de MSYS)

Code:

---

1 2 3 4 5 6

c:\tmp> type test.pl print "# args=" + scalar @ARGS + "\n";   c:\tmp> \msys\1.0\bin\perl test.pl 'C:\Documents and Settings\caine\Mes documents\VosLogiciels.com\Logs OVH\creationlogiciel.net-22-11-2009.log.gz' 1

---

Au passage, pour un affichage du résultat plus en adéquation avec ce qui est attendu, il faut remplacer l'opérateur + par l'opérateur . dans le print (nous ne sommes pas en Javascript ;) ).

Merci,

Pour djibril, j'ai oublié de précisé sans allez chercher des extensions ou modules cpan...

En fait, j'aimerais surtout comprendre d'où vient le problème.

Dans quel shell appelle-tu ton script, et quelle version de perl est installée ?
Pour ma part, Sous Win32/Cygwin/perl 5.10 :

Code:

---

1 2 3

$ perl -e 'print "# args=" . scalar @ARGV . "\n";' "C:\Documents and Settings\caine\Mes documents\VosLogiciels.com\Logs OVH\creatio nlogiciel.net-22-11-2009.log.gz" # args=1

---

(avec des quotes simples ou double, même résultat).

Citation:

---

Envoyé par Caine

Merci,

Pour djibril, j'ai oublié de précisé sans allez chercher des extensions ou modules cpan...

En fait, j'aimerais surtout comprendre d'où vient le problème.

---

Sauf qu'en utilisant le module dans la doc, c'est plus propre, simple et efficace, de plus, tu n'as rien à installer vu qu'il est dans le core de Perl.

Sinon c'est assez étrange que ton code affiche 5 au lieu de 1.
Version de Perl ?
OS ?
shell ?
Code complet ?