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

[gaal]

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

If that happened, I would call it a bug. But for me, it doesn't happen:

[roo@sike:~ 747] > perl -le 'package foo ;print eval('__PACKAGE__');'
foo

(This is perl, v5.8.4 built for i386-linux-thread-multi. Debian.)

[Corion]

You made a classic shell quoting error - use double quotes for the internal quotes:

perl -le 'package foo ;print eval("__PACKAGE__");'

or, when your shell only gives you one flavour of quote, use Perls superior quoting facilities:

perl -le 'package foo ;print eval(q(__PACKAGE__));'

[gaal]

Eek, you're right; the unquoted __PACKAGE__ of course comes from the un-evaled compile-time pass, and hence does say "foo".

I can't find mention of this behavior in the docs (eval is where I'd like it to be), so yes, I'd consider this a bug.