our %GLOBAL_SYMBOL; # these are not package constants, but Perl artifacts
BEGIN {
    %GLOBAL_SYMBOL = map { $_ => 1 } qw(BEGIN EXPORT ISA EXPORT_OK GLOBAL_SYMBOL);  
}