Program co vypisuje sebe

[David Rohleder]

xsorm na informatics.muni.cz (Milan Sorm) writes:

> Wed, Apr 21, 1999 ve 05:48:34PM +0200 Michal Pise napsal:
> # Rekl bych, ze tady jde spise o sestrojeni hricky - ne o program, ktery neco
> # dela a jeste umi vypsat sam sebe, protoze vi, kde je v pameti nebo na disku,
> # ale o program, ktery neco tiskne a to neco se shoduje se zdrojakem toho
> # programu. Pouhe cviceni v syntaxi: nejde napsat jenom print "print", protoze to
> # by program musel vypadat print 'print "print"'. Takze jde spise o nalezeni
> # nejake finty.
> # Navrhuji
> # $prg = q{ print '$prg = q{'.$prg.'} and'.$prg;} and print '$prg = q{'.$prg.'} and'.$prg;
> # 
> # cat na konci odradkuje perl ne, ale ten konec radku v programu neni, to si tam
> # doplnil cat
> #                      Michal Pise
> 
> muzete mi tu nekdo jasne a srozumitelne napsat, co teda chcete udelat ? mel
> jsem za to, ze vypsat zdrojak aktualniho programu - to rikam, ze nejde bez
> diskove operace.
> 
> nebo jde o neco jineho ?
> 
> jestli jde jen o vytisteni kusu zdrojaku, navrhuju:
> 
> print <<'EOF';
> 
> ..zdrojak...
> 
> EOF

Klid. Je to jenom takovy zertik, ktery nedela nic rozumneho, pouze
vytiskne svuj vlastni zdrojovy kod (caste treba na cviceni z pascalu
nebo c). Zadny pristup na disk, vsechno je ulozeno ve zdrojaku
programu. Je to proste takovy logicky hlavolam a clovek si musi davat
pozor, aby se nezarekurzil :-)

> 
> milan

-- 
-------------------------------------------------------------------------
David Rohleder						davro na ics.muni.cz
Institute of Computer Science, Masaryk University
Brno, Czech Republic
-------------------------------------------------------------------------