my $time = (stat($filename))[8];