mem #6

quine - программа выдающая на выход свой исходник.

$_=q{$_=q{x};s/x/$_/;print};s/x/$_/;print

UPDATE:

open+0;print<0>