reduce smg

on top of sub-util, so please merge to sub-util only
fixes https://rt.perl.org/Public/Bug/Display.html?id=121992#txn-1297554