my( $help,
     $man,
 $version,
$token_debug,
$glossary_output, $dictionary_output ) = ('') x 6;