Fellow Perl neophytes ( and non-neophytes),
        I need a little clarification.  I am trying to remove files that are
greater that 24 hours old.  The code snippet below is in a 'while' loop that
steps through a directory, yet it seems not to work - no files are removed
no matter what their 'age' ( i.e., their creation time ).  I have stepped
through the code via the Perl debugger and know the code is being executed.

        unlink $file unless -C $file < 1;

        Another question - is the creation time of a file 'updated' whenever
a 'write' to the file is performed or does the creation time remain static?
I need a way to delete files based on the file creation time and that time
needs to be static.
        One last - unrelated - query:  Does anyone know of a Oracle PL/SQL
mailing list ( e.g., [EMAIL PROTECTED] )?
        Thanks to all in advance and cheers to our friends across the pond!

> Anthony (Tony) Esposito
> Senior Technical Consultant 
> Inovis(tm)
> 2425 N. Central Expressway, Suite 900 
> Richardson, TX  75080 
> (972) 643-3115 
> [EMAIL PROTECTED] 
> 
> 

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to