jerrygarciuh has asked for the wisdom of the Perl Monks concerning the following question:
Fellow monks,
While trying to learn more about the symbol table I printed out %main:: in a script whose only imported package was strict. The code and it's output are below, can anyone tell me what the mystery entries are on lines 5, 11, and 14 of the output text? Apparently the standard windows charset doesn't represent them?
TIA
jg
_____________________________________________________
"The man who grasps principles can successfully select his own methods.
The man who tries methods, ignoring principles, is sure to have trouble.
~ Ralph Waldo Emerson
While trying to learn more about the symbol table I printed out %main:: in a script whose only imported package was strict. The code and it's output are below, can anyone tell me what the mystery entries are on lines 5, 11, and 14 of the output text? Apparently the standard windows charset doesn't represent them?
TIA
jg
#!/usr/bin/perl -w use strict; while (my ($k, $v) = each %::) { print "key is $k, value is $v\n"; } key is STDOUT, value is *main::STDOUT key is @, value is *main::@ key is ARGV, value is *main::ARGV key is STDIN, value is *main::STDIN key is , value is *main:: key is attributes::, value is *main::attributes:: key is DB::, value is *main::DB:: key is _<..\xsutils.c, value is *main::_<..\xsutils.c key is _<perllib.c, value is *main::_<perllib.c key is UNIVERSAL::, value is *main::UNIVERSAL:: key is , value is *main:: key is <none>::, value is *main::<none>:: key is DynaLoader::, value is *main::DynaLoader:: key is , value is *main:: key is Win32::, value is *main::Win32:: key is BEGIN, value is *main::BEGIN key is stderr, value is *main::stderr key is INC, value is *main::INC key is _, value is *main::_ key is ", value is *main::" key is _<.\win32.c, value is *main::_<.\win32.c key is $, value is *main::$ key is stdout, value is *main::stdout key is IO::, value is *main::IO:: key is ENV, value is *main::ENV key is strict::, value is *main::strict:: key is stdin, value is *main::stdin key is CORE::, value is *main::CORE:: key is /, value is *main::/ key is 0, value is *main::0 key is _<..\universal.c, value is *main::_<..\universal.c key is STDERR, value is *main::STDERR key is main::, value is *main::main::
_____________________________________________________
"The man who grasps principles can successfully select his own methods.
The man who tries methods, ignoring principles, is sure to have trouble.
~ Ralph Waldo Emerson
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Unknown entries in %main::
by theorbtwo (Prior) on Dec 18, 2002 at 03:43 UTC | |
by jerrygarciuh (Curate) on Dec 18, 2002 at 04:04 UTC | |
Re: Unknown entries in %main::
by pg (Canon) on Dec 18, 2002 at 03:12 UTC | |
by jerrygarciuh (Curate) on Dec 18, 2002 at 03:23 UTC |
Back to
Seekers of Perl Wisdom