fix build under -DPERL_GLOBAL_STRUCT

broken by ddacf109924c0c8a66c97d6dedaa70047c373454