my $stringToProcess = join($SEP_CHAR, split(/\Q$character\E/, $string)); #### $character = qr/\Q$character\E/ if $character eq '+'; my $stringToProcess = join($SEP_CHAR, split($character, $string));