"first time" tweak from PerlJam++