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.)

Replies are listed 'Best First'.
Re^2: eval('__PACKAGE__') is always main?!!!
by Corion (Patriarch) on Dec 23, 2004 at 20:11 UTC

    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__));'
      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.