use File::stat;
print stat('/some/file')->atime;