my $modtime = (stat($fh))[9]

##</code><code>##

my %HoH = ( file_name => {
    stat  => 'date here',
    location => 'path to file'
    );