for my $string1 (@strings_left) {
    my $string1_clean = clean( $string1 );
    for my $string2 (@strings_right) {
        if( compare($string1_clean, clean( $string2 )) {
            ...
        }
    };
};