my $hash_key =~ s/\.txt//; # generate hash key