#!perl -p0
s#^>|^(..*)#$1&&"/* $& */"#meg;s# ./
/.#
  #g