# my %translate = (
#   funca => [ qr/funca\( ([^,]+) , ([^,]+) ,([^,]+) ,([^)]+) \)/x,
#              '"func($1,$2,XXX,YYY,$4)"' ],
#   funcb => [ qr/funcb\( ([^,]+) , ([^,]+) ,([^,]+) ,([^)]+) \)/x,
#             '"func($1,$2,,,$4)"' ],
#);

##</code><code>##

funca(1,2,funcH(A,B,C),3)