DB<32> < $main::a++
  DB<33> print $main::a
5
  DB<34> print $main::a
5
  DB<35> print $main::a
5