$ perl -MO=Deparse,-x,-p -e 'use constant VERBOSE => 0; if ( VERBOSE ) { v_print3( "foo" ) }; '
use constant ('VERBOSE', 0);
'???';
-e syntax OK