my $time = -d $file;