http://www.perlmonks.org?node_id=110189


in reply to Overhead of __DATA__?

As far as I can tell (and I'm not an expert on the Perl sources), during tokenization when __DATA__ is encountered Perl creates a filehandle for the current package called DATA and leaves the file pointer right there.

Other nonsense happens if you're on a platform that cares about binmode() and whether the script was found on stdin...<handwave/>

(Curiously, DATA is assumed to be untainted. I wonder if this could be used to a JAPH's advantage...)

Replies are listed 'Best First'.
Re: Re: Overhead of __DATA__?
by E-Bitch (Pilgrim) on Sep 05, 2001 at 08:16 UTC
    Actually, Cirollo did just that with an Obfu... very interesting, and the first I had ever encountered it.
    _________________________________________
    E-Bitch
    Tempora Mutantur Nos et Mutamur in Illis
    "The Times are Changed Even as We are Changed in Them"
Re: Re: Overhead of __DATA__?
by extremely (Priest) on Sep 05, 2001 at 20:52 UTC
    What is curious about DATA being untainted when read? Would you rather the program consider itself tainted? =)

    --
    $you = new YOU;
    honk() if $you->love(perl)