Greetings, I have the following code:
opendir (INFO,"l:/01_informatique") || die " impossible d'ouvrire le
r�pertoire 01_informatique: $!";
while ($fic=readdir INFO)
{
if($fic=~/^c/)
{
@date=stat($fic);
print "$date[7]\n";
}
}
close INFO;
There is nothing in the screen !
Best regards,
Franck
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
