Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Re: Overhead of __DATA__?

by clintp (Curate)
on Sep 05, 2001 at 02:43 UTC ( #110189=note: print w/ replies, xml ) Need Help??

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...)

Comment on Re: Overhead of __DATA__?
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.
    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)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://110189]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2015-11-26 09:02 GMT
Find Nodes?
    Voting Booth?

    What would be the most significant thing to happen if a rope (or wire) tied the Earth and the Moon together?

    Results (696 votes), past polls