Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

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

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 all is quiet...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2018-02-18 02:08 GMT
Find Nodes?
    Voting Booth?
    When it is dark outside I am happiest to see ...

    Results (250 votes). Check out past polls.