foreach my $intersect_file (@intersect_keys) { foreach my $exec (@{ $system_file_data{$intersect_file} }) { print("$exec\n"); } }