Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re: Perl is psychic?!

by mkmcconn (Chaplain)
on Mar 07, 2001 at 01:31 UTC ( #62584=note: print w/ replies, xml ) Need Help??

in reply to Perl is psychic?!

This introduces several new ideas to me, so I played with it for more than a quarter hour, at a console command-line. I tried in 5.005_003 and in 5.6, evaluating a second eval(), getting the same behavior as for the first eval(). I guess it clarifies the behavior, and hopefully it's contributory to an interesting thread.

> perl -wle ' q(foo) =~ m/.*/; eval <>;' print $&; q(snarf) =~ m/.*/ ; eval <>; #prints 'foo', not 'snarf' and waits for input;

And, I think this is amusing:

> perl -le ' my $incr = 0; q( print $incr++, $& and " stew" =~ /.*/ and eval $& until $incr > 10) + =~ /.*/; eval <>;' eval $&; # prints '0 ( guesswhat) '..'10 stew' (versions differ on +-w)

edited after first posting, to simplify examples

Comment on Re: Perl is psychic?!
Select or Download Code

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (9)
As of 2015-12-01 10:08 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 (798 votes), past polls