Discussion :

[clepape]

bonjour,

mon problème est que mon programme fonctionne ou non en fonction des paramètres passé en ligne de commande.

mon programme de fait que déplacer des fichiers.

texte passé en ligne de commande :

Code :

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

1
2
 
e:\exploitation\script\PERL\perl.exe e:/exploitation/script/PARTAGE/move.pl e:/exploitation/donnee/reception/DEPENSES/COMPTES e:/exploitation/donnee/chargement/DEPENSES/COMPTES

cela ne marche pas alors que si je tappe le texte suivant ca fonctionne

Code :

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

1
2
 
e:\exploitation\script\PERL\perl.exe e:/exploitation/script/PARTAGE/move.pl e:/exploitation/donnee/reception/AA e:/exploitation/donnee/chargement/AA

pour m'affranchir des droits sur les repertoires j'ai retiré la majorité du code du programme en ne gardant que la récupération des paramètres et le problème reste le même.

mon prog :

Code :

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

1
2
3
4
 
use strict;
my $path_rep_depos=$ARGV[0];
my $path_rep_cible=$ARGV[1];

y a t il une taille max pour les arguments ?

merci

claire

[nematoad]

oui, et ça dépend des plateformes. sur VMS c'est 255, solaris : 1024, FreeBSD et Linux un peu plus, Windows, je ne m'en souviens plus

Tu pourrais peut-être adopter une stratégie d'un répertoire de base par défaut, genre

Code :

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

use constant REP_BASE => 'e:/exploitation.donnee';

alors tu pourrais appeler le script avec

Code :

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

1
2
@echo off
perl e:/exploitation/script/PARTAGE/move.pl reception/DEPENSES/COMPTES chargement/DEPENSES/COMPTES

(mettre perl.exe dans ton PATH, ou vice versa) et tu normaliserais les chemins des fichiers avec

Code :

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

1
2
3
4
5
my $source = shift or die "Pas de fichier source\n";
my $dest   = shift or die "Pas de fichier destination\n";
 
$source = BASE_REP . "/$source";
$dest   = BASE_REP . "/$dest";

N

[Jedai]

Un autre problème éventuel : est-ce que tous ces répertoires existent préalablement à la commande ? Si ce n'est pas le cas, il faut créer les répertoires avant de transférer le fichier.
Mais tout cela n'est que supposition si tu ne nous donnes pas le code que tu utilises pour déplacer les fichiers.

--
Jedaï