in reply to How to write a script that prints its own source code?

--- begin program test.pl ---
1;
---- end program ---

How to use:
perl -p test.pl test.pl

[download]

Replies are listed 'Best First'.
Re: Re: CityCat
by fglock (Vicar) on Sep 17, 2002 at 20:35 UTC

    ok :)

    --- begin program test.pl ---
print;
---- end program ---

How to use:
perl -n test.pl test.pl

    [download]
[reply]
[d/l]
A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom