Re^3: Using the DATA file handle for ARGV


Come for the quick hacks, stay for the epiphanies.
	PerlMonks

Re^3: Using the DATA file handle for ARGV

by Grimy (Pilgrim)

on Jun 01, 2013 at 21:30 UTC ( [id://1036505]=note: print w/replies, xml )

Need Help??

in reply to Re^2: Using the DATA file handle for ARGV
in thread Using the DATA file handle for ARGV

@ARGV = 'echo 42 |';
print <>;     # prints 42
print $ARGV;  # prints echo 42|
[download]

Unless I'm mistaken, this illustrates that both @ARGV and $ARGV are usually magic.

But I thing I got it. There's isn't actually any magic in @ARGV and $ARGV. It's just the magic *ARGV{IO} that pops @ARGV and writes $ARGV. Once the magic *ARGV{IO} is gone, those variables are nothing special. Or am I still completely mistaken?

Comment on Re^3: Using the DATA file handle for ARGV Select or Download Code

Replies are listed 'Best First'.

Re^4: Using the DATA file handle for ARGV
by Anonymous Monk on Jun 02, 2013 at 00:43 UTC

Once the magic *ARGV{IO} is gone, those variables are nothing special. Or am I still completely mistaken?

I think you're right. I think the magic belongs to readline ARGV , not readline *DATA, and when you do *ARGV = *DATA it makes *ARGV an alias for *DATA, doesn't make *DATA an alias for *ARGV, so *DATA has no magic

$ echo |perl -e " *ARGV = *DATA; print while <DATA> "

$ echo |perl -e " *DATA = *ARGV; print while <DATA> "
ECHO is on.
[download]

[reply]
[d/l]

In Section Meditations

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1036505]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others exploiting the Monastery: (8)

As of 2024-04-23 10:00 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found