%Hash_filenames = map {
    chomp;
    local @ARGV = ($_);
    ($_ => [<>])
} @plf_files;