logger abcdef123,"$£*&GHi^ #### logger "765)(?>jh",hhhhhh,joebloggs #### $string =~ s/(logger\s+)(\w+)(\W+)(\w+)/$1 . ("X" x length($2) . $3 . ("X" x length($4))/e;
## logger "765)(?>jh",hhhhhh,joebloggs ##
## $string =~ s/(logger\s+)(\w+)(\W+)(\w+)/$1 . ("X" x length($2) . $3 . ("X" x length($4))/e;