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

##</code><code>##

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