my $HighlightText = $CgiArgsRef->{'RawValue'};
        $HighlightText =~ s/&/&/go;
        $HighlightText =~ s/  /  /go;              # also use normal spaces so line wrap is still possible
        $HighlightText =~ s/\t/     /go; # also use normal spaces so line wrap is still possible
        $HighlightText =~ s/</&lt;/go;
        $HighlightText =~ s/>/&gt;/go;
        $HighlightText =~ s/\r\n/<br>/go;
                        
        # escaped characters
        $HighlightText =~ s/(\\\S)/<span class="escapedregexhighlight">$1<\/span>/gso;

        my $n = 1;
        # groupings like (..)
        $HighlightText =~ s/([^\\]?|^)(\()(.+?[^\\])(\))/sprintf("%s<span class=\"searchregexhighlight\">%s<\/span><span class=\"groupregextextcolor\">%s<\/span><span class=\"searchregexhighlight\">%s<\/span><span class=\"parametersup\">\0x00%s<\/b><\/span>",$1,$2,$3,$4,$n++)/gsoe;

        # single chars like . * ^ $ ? + and aggregates like {} and []
        $HighlightText =~ s/([^\\]|^)([\.\+\*\?]+|[\^\$\(]|\)\+?\??\*?\{?\d*,?\d*\}?|\[.+?\]\+?\??\*?\{?\d*,?\d*\}?|\{\d*,?\d*\})/$1<span class="searchregexhighlight">$2<\/span>/gso;


        # other characters
        $HighlightText =~ s/\\{0}(\\[\w\s\d])/<span class="searchregexhighlight">$1<\/span>$3/gso;

        # put back the '$' in parameter subscripts
        $HighlightText =~ s/\0x00/\$/go;

        $HighlightText =~ s/[\r\n]+/<br>\n/go;