H,
Sudarsan
>
> Franck
>
> -Message d'origine-
> De : COLLINEAU Franck FTRD/DMI
> [mailto:[EMAIL PROTECTED]]
> Envoyé : mardi 22 janvier 2002 08:15
> À : [EMAIL PROTECTED]
> Objet : -d test file
>
> Greetings,
>
> I have the following code:
> #!/u
Title: RE: -d test file
I've found. I have to put the absolute path.
Is there a way without absolute path ?
Franck
-Message d'origine-
De : COLLINEAU Franck FTRD/DMI
[mailto:[EMAIL PROTECTED]]
Envoyé : mardi 22 janvier 2002 08:15
À : [EMAIL PROTECTED]
Objet : -d
Greetings,
I have the following code:
#!/usr/bin/perl -w
$chemin="/home/collineau/tests";
opendir (DIR,"$chemin") || die " impossible d'ouvrir le répertoire $chemin
$!";
while ($rep=readdir DIR)
{
print "$rep\n";
$a =-d $rep;
print "$a\n";
}
The output is:
..
1
...
1
T
