Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re^3: Assignment and use statement in the same BEGIN block -- oneliner

by Discipulus (Abbot)
on Jan 31, 2019 at 20:31 UTC ( #1229207=note: print w/replies, xml ) Need Help??


in reply to Re^2: Assignment and use statement in the same BEGIN block
in thread Assignment and use statement in the same BEGIN block

> you ain't finish BEGIN'ing until you end (close) it

(this is life..)

indeed! and I never realized they can be nested!

perl -e "$}.=qq(BEGIN{print qq($_);)for(q(,rekcaH lreP rehtonA tsuJ)=~/./g);$}.=q(})x25;eval$}"

L*

update

removed and published separately as obfu

There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.
  • Comment on Re^3: Assignment and use statement in the same BEGIN block -- oneliner
  • Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2019-09-18 02:49 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The room is dark, and your next move is ...












    Results (219 votes). Check out past polls.

    Notices?