Select Code to Download

sub replace_split_1 {  # pre-5.10 safe: no // operator, no regex exten
+sions

...
    return $replace_right_to_left ? reverse $string : $string;

    }  # end sub replace_split_1()