Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: eval('__PACKAGE__') is always main?!!!

by hossman (Prior)
on Dec 23, 2004 at 20:14 UTC ( #417202=note: print w/replies, xml ) Need Help??


in reply to eval('__PACKAGE__') is always main?!!!

this is odd...

hal:~> cat test.pl package foo ; print eval('__PACKAGE__'); hal:~> perl -l test.pl main hal:~> perl -le 'package foo ;print eval('__PACKAGE__');' foo

Update: d'oh! ... that's what i get for trusting someone else's test case without looking at it closely.

what makes the -e version "work" is definitely the quotes, perl is seeing it as...

package foo ;print eval(__PACKAGE__);

...in which case the __PACKAGE__ gets interpolated before the eval.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://417202]
help
Chatterbox?
[Corion]: I think there's always some Dell coupon around, at least I got one the last two times I bought a machine from them
[1nickt]: I have been an apostate in the Apple orchard for almost 15 years. But Dells are still high quality it seems, unlike Macs these days.
[1nickt]: And you can still configure the system at will, on the "Small Business" site.
[Corion]: 1nickt: I bought a 2015 XPS 13, which is a very nice and shiney (and somewhat overpriced) machine, but I think it's still better priced than an Apple machine. Now it just has to hold up 10 years like the old one did ;)

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (7)
As of 2017-03-27 13:01 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Should Pluto Get Its Planethood Back?



    Results (320 votes). Check out past polls.