Re^2: Using the DATA file handle for ARGV

[Anonymous Monk]

However, in this case, it looks like @ARGV and $ARGV are stripped of all magic by the manipulation (@DATA and $DATA ain't getting any magic neither). Can somebody explain what's happening there?

Why would there be "magic", and what would this "magic" do?

[Grimy]

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

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?

[Anonymous Monk]

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.