Help for this page
if (c()) { f(); g() }
c() and do { f(); g() };
$ diff -u \ > <( perl -MO=Concise,-exec -e' if (c()) { f(); g() } ' 2>&1 ) \ ... 3 <0> pushmark s 4 <#> gv[*c] s/EARLYCV 5 <1> entersub[t2] sKS/TARG,1