-A 'file' will give you how many days ago file was accessed... maybe better for reading would be to use the stat() function to get the access time in seconds since the epoch (same type of output as time()) here is a simple script...

#!/usr/bin/perl

print qq`
Usage: $0 <files to check>
`;

for(@ARGV) {
    printf("%24s was last accessed on %s\n",$_,scalar localtime((stat 
+$_)[8]));
}
[download]

                - Ant
                - Some of my best work - Fish Dinner