Program co vypisuje sebe

[Michal Svec]

> $s='print "\$s=\047$s\047;$s";';print "\$s=\047$s\047;$s";
> 
> Ale to se mi moc nelibi. Kdyby nekoho napadlo bud kratsi reseni (co do
> poctu znaku) nebo hezci (napriklad, aby tam nebylo to skarede \047) tak
> bych byl potesen, kdyby mi ho prozradil. Dik.

Mam dojem, ze nejkratsi program, co vypise sam sebe, je program prazdny
;-)

Michal