perl -pe's/(\G|(.)(?!\2))((.)\4)(?!\4)/$2($3)/g' file