Stat function

[COLLINEAU Franck FTRD/DMI/TAM]

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]