Re: [PERL] Kan et script editere i sig selv ?

[Peter Makholm <sslug@sslug>]

Michael Schmidt <sslug@sslug> writes:

> man kan altså ikke have en linje kode, der sletter den forige og
> skriver den næste, der efterfølgende vil blive eksekveret?  /Zmit

Man kunne måske lave noget ligende:

#!perl

@skript = ('use Modul;',
           'sub f{ ...}',
           'push @skript, q{something}',
          )

while($linje = shift @script) {
    eval $linje;
}
__END__

Men jeg har overhovedet ikke afprøvet det, og man skal sikre sig at
hver linje består at et fuldt udtryk. og ikke bare 'while ($test) {'.

-- 
 Peter Makholm     |              I have no caps-lock but I must scream...
 sslug@sslug |                                               -- Greg
 http://hacking.dk |