$string =~ s/(..)/$1|/g;