Discussion :

[laurent33500]

Bonjour à tous

j'ai un souci dans mon script au niveau de la copie de fichier (Module COPY_FICHIER).
La première partie du if se passe bien mais la partie else.

Pouvez vous m'aider ?

Cordialement

[laurent33500]

Premier indice
la variable $repfinal2 n'est pas valorisée.

[Gardyen]

tu ne retournes pas tes valeurs correctement dans CREAREP_DEPOT, tu ne peux avoir qu'un seul return
place tes 2 valeurs dans une liste que tu retournes par exemple

[JeanMi3000]

Et en mettant des backslashs devant tous les points ? :

Code :

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

if ( $file =~ /\.(Smp\.pdf|Idx\.pdf)$/i )

et au vu de la remarque de laurent33500 :

Code :

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

1
2
return my $repfinal1 = "$destination1\\$annee\\$mois\\$jour" ;
return my $repfinal2 = "$destination2\\$annee\\$mois\\$jour" ;

je me trompe ou ce genre de code ne peux pas fonctionner ??
Une fois le premier return effectué, le second n'a plus aucune légitimité, non ?
Tu cherches à renvoyer une liste d'élément dans la fonction CREAREP_DEPOT, je te suggère de remplacer les 2 return par :

Code :

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

return ("$destination1\\$annee\\$mois\\$jour", "$destination2\\$annee\\$mois\\$jour");

[laurent33500]

merci c’était la mon erreur.

[Lolo78]

La principale erreur est dans ces deux lignes:

Code :

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

1
2
3
 
return my $repfinal1 = "$destination1\\$annee\\$mois\\$jour" ;
return my $repfinal2 = "$destination2\\$annee\\$mois\\$jour" ;

Il faut avoir un seul return (le premier return sort de la fonction, le second n'est jamais exécuté).

Essaie par exemple, ceci:

Code :

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

1
2
 
return ("$destination1\\$annee\\$mois\\$jour" , "$destination2\\$annee\\$mois\\$jour" );

Mais il y aurait pas mal d'autres choses à dire sur le code...

EDIT: oups, plusieurs réponses pendant que je rédigeais la mienne. Mes doigts ne sont pas assez rapides.