c:/perl/misc $ perl -MO=Deparse quine.pl 
Can't call method "PADLIST" on an undefined value at c:/Perl/lib/B/Deparse.pm line 1039.
CHECK failed--call queue aborted.

##</code><code>##

c:/perl/misc $ perl -v

This is perl, v5.6.1 built for MSWin32-x86-multi-thread
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2001, Larry Wall

Binary build 633 provided by ActiveState Corp. http://www.ActiveState.com
Built 21:33:05 Jun 17 2002