http://www.perlmonks.org?node_id=1030916


in reply to In -X FILEHANDLE, how to derive the -C of all files in a $dir variable?

From perlfunc:

-M Script start time minus file modification time, in days. -A Same for access time. -C Same for inode change time

So, for 15 minutes you want any matching file where the return from -C is > than 15*60 / 86400:

while( glob '*' ) { if( -C() > 0.010416 ) { unlink $_; } }

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.