Symbol table dumping at Perl 5...

output.txt

Dumping 'main' symbol table.
Exporter:: => *main::Exporter::
*main::Exporter:: => 
" => *main::"
*main::" => 
utf8:: => *main::utf8::
*main::utf8:: => 
 => *main::
*main:: => 
DynaLoader:: => *main::DynaLoader::
*main::DynaLoader:: => 
BEGIN => *main::BEGIN
*main::BEGIN => 
UNIVERSAL:: => *main::UNIVERSAL::
*main::UNIVERSAL:: => 
Regexp:: => *main::Regexp::
*main::Regexp:: => 
_<mro.c => *main::_<mro.c
*main::_<mro.c => 
_<perl.c => *main::_<perl.c
*main::_<perl.c => 
_<perlio.c => *main::_<perlio.c
*main::_<perlio.c => 
_<universal.c => *main::_<universal.c
*main::_<universal.c => 
STDIN => *main::STDIN
*main::STDIN => 
constant:: => *main::constant::
*main::constant:: => 
INC => *main::INC
*main::INC => 
re:: => *main::re::
*main::re:: => 
/ => *main::/
*main::/ => 
mro:: => *main::mro::
*main::mro:: => 
IO:: => *main::IO::
*main::IO:: => 
 => *main::
*main:: => 
stderr => *main::stderr
*main::stderr => 
version:: => *main::version::
*main::version:: => 
, => *main::,
*main::, => 
_<perlmain.c => *main::_<perlmain.c
*main::_<perlmain.c => 
ARGV => *main::ARGV
*main::ARGV => 
Internals:: => *main::Internals::
*main::Internals:: => 
_<symbol.pl => *main::_<symbol.pl
*main::_<symbol.pl => 
0 => *main::0
*main::0 => 
@ => *main::@
*main::@ => 
CORE:: => *main::CORE::
*main::CORE:: => 
stdout => *main::stdout
*main::stdout => 
STDOUT => *main::STDOUT
*main::STDOUT => 
DB:: => *main::DB::
*main::DB:: => 
ENV => *main::ENV
*main::ENV => 
stdin => *main::stdin
*main::stdin => 
STDERR => *main::STDERR
*main::STDERR => 
_ => *main::_
*main::_ => 
 => *main::
*main:: => 
PerlIO:: => *main::PerlIO::
*main::PerlIO:: => 
main:: => *main::main::
*main::main:: => 

Dumping 'CORE' symbol table.
GLOBAL:: => *CORE::GLOBAL::
*CORE::GLOBAL:: => 

Dumping 'UNIVERSAL' symbol table.
isa => *UNIVERSAL::isa
*UNIVERSAL::isa => 
DOES => *UNIVERSAL::DOES
*UNIVERSAL::DOES => 
VERSION => *UNIVERSAL::VERSION
*UNIVERSAL::VERSION => 
can => *UNIVERSAL::can
*UNIVERSAL::can => 

symbol.pl

use v5.20;

my %symbol;

%symbol = %{ main:: };

say "Dumping 'main' symbol table.";
for my $entry (%symbol) {
	say $entry, " => ", $symbol{ $entry };
}
say "";

say "Dumping 'CORE' symbol table.";
%symbol = %{ main::CORE:: };
for my $entry (%symbol) {
	say $entry, " => ", $symbol{ $entry };
}
say "";

say "Dumping 'UNIVERSAL' symbol table.";
%symbol = %{ main::UNIVERSAL:: };
for my $entry (%symbol) {
	say $entry, " => ", $symbol{ $entry };
}
say "";