foreach my $intersect_file(@intersect_keys) {
    my $exec = $system_file_data{$intersect_file};
    print $exec;
}