Select Code to Download

sub MI {
    my( $string_es, $string_en, $hash_es, $hash_en ) = @_;
...

    return $intersects;
}