in reply to Unknown entries in %main::
(Update: I read your reply, so you really want to know. Okay, don't forget those perlvars named $^C (COMPILING), $^F (SYSTEM_FD_MAX) etc., when you print them, they show as little unrecognizable symbols. Use ord to print out their ascii values, then you will recognize them. :-)
The output from your code is not that meaningful, isn't it?
Yes, Symbol table is a hash, but not really that straight. Think about this, in a hash you can not have duplicate keys, but in your program, you might have a hash and a scalar both named abc.
Don't forget typeglob.
The output from your code is not that meaningful, isn't it?
Yes, Symbol table is a hash, but not really that straight. Think about this, in a hash you can not have duplicate keys, but in your program, you might have a hash and a scalar both named abc.
Don't forget typeglob.
foreach $symname (sort keys %main::) { local *sym = $main::{$symname}; if (defined $sym) { print "\$$symname is defined, and value is $$symname\n"; } if (defined @sym) { print "\@$symname is defined, and value is @$symname\n"; } if (defined %sym) { print "\%$symname is defined, and value is %$symname\n"; } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: Unknown entries in %main::
by jerrygarciuh (Curate) on Dec 18, 2002 at 03:23 UTC |
In Section
Seekers of Perl Wisdom