Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: Re: (XML::Parser) Finding and fixing a bug

by Juerd (Abbot)
on Apr 21, 2003 at 23:19 UTC ( #252148=note: print w/replies, xml ) Need Help??

in reply to Re: (XML::Parser) Finding and fixing a bug
in thread (XML::Parser) Finding and fixing a bug

my $config = $parser->parse('CONFIG');

my $config = $parser->parse(*CONFIG);
But that would better be checked with something like ref(\$arg) eq 'GLOB'.

But... XML::Parser::Expat::parse allows strings to be used. In your try, it'll try to use XML::Parser::Expat::CONFIG. Things change if your symbolic reference contains :::

my $config = $parser->parse('main::CONFIG');
It is unlikely that someone uses a string constant there, but it COULD be some $foo that is the result of whatever, which could in turn be some stringified version of *CONFIG. *CONFIG stringifies to *main::CONFIG, and with that * there it still works:
my $config = $parser->parse('*main::CONFIG');

I didn't want to break (stupid) code like this:

sub something_that_stringifies { "$_[0]" } my $fh = something_that_stringifies *CONFIG; my $config = $parser->parse($fh);

- (do not use).

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://252148]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (3)
As of 2018-01-21 00:53 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (227 votes). Check out past polls.