Bonjour, je teste un code qui me permet d'effectuer une action (encore non déterminée...) sur des fichiers datant de plus d'un jour.

Pour se faire, j'ai écrit le petit code suivant en Perl. C'est la première fois que j'utilise ce langage.

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
 
 
#!/usr/bin/perl -w
use strict;
 
@file=`find /export/home/hufg/logs -ctime -1`;
 
 
foreach my $name (@file) 
{
	if (-f $name)
	{
		print $name,"\n";
	}
}
Le problème vient du

Code : Sélectionner tout - Visualiser dans une fenêtre à part
if (-f $name)
Quand je l'exécute, je reçoit comme erreur :

Unsuccessful stat on filename containing newline at date_file_directory.pl line 12.
Or si j'ajoute :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
$name="/export/home/hufj/logs/error.2008_12_10.log";
Tout ce passe bien...

Ou est ma faute?? Mon FIND me renvoi pourtant une ligne normale sans "newline" quand je l'imprime .

Je suis certain que c'est bête mais la je vois pas..

Merci d'avance