Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

B::Hooks::OP::Check::StashChange causes split to disappear

by kroach (Pilgrim)
on Aug 13, 2020 at 23:49 UTC ( #11120698=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    INSTALL_HOOK=0 perl -MO=Deparse -MB::Hooks::OP::Check::StashChange -e 
    +'BEGIN { my $id = B::Hooks::OP::Check::StashChange::register(sub {}) 
    +if $ENV{INSTALL_HOOK}; } print split "x", "1x2"'
    
    ...
    }
    print split(/x/, '1x2', 0);
    -e syntax OK
    
  2. or download this
    INSTALL_HOOK=1 perl -MO=Deparse -MB::Hooks::OP::Check::StashChange -e 
    +'BEGIN { my $id = B::Hooks::OP::Check::StashChange::register(sub {}) 
    +if $ENV{INSTALL_HOOK}; } print split "x", "1x2"'
    
    ...
    }
    print 'x', '1x2';
    -e syntax OK
    

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://11120698]
Approved by jcb
Front-paged by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (3)
As of 2022-05-23 19:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (82 votes). Check out past polls.

    Notices?