my @info = stat($file);
my $last_access =  $info[8];
my $last_modification = $info[9];

##</code><code>##

# Age of file in days since modification:
-M $file
# Age of file in day since last access:
-A $file 
# Age of file in days since inode change:
-C $file