for my $filename (@list_files)