Perl Module
See: Perl Program, Programming Library.
Notes
foreach $symbol_name (sort keys %TGQueryDataMgmt::) {
local *local_sym = $TGQueryDataMgmt::{$symbol_name};
print "\$$symbol_name is defined\n" if($local_sym);
print "\@$symbol_name is defined\n" if(@local_sym);
print "\%$symbol_name is defined\n" if(%sym);
}