my $filetime = ( stat $entry )[9];
my $checktime = $filetime + 604800;