Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^2: Bug in perl command line processing?

by demerphq (Chancellor)
on May 22, 2012 at 21:14 UTC ( #971878=note: print w/ replies, xml ) Need Help??


in reply to Re: Bug in perl command line processing?
in thread Bug in perl command line processing?

The -e1 is unnecessary.

$ perl -MO=Deparse -i'foo e eval "warn q[bar]";' BEGIN { $^I = "foo"; } eval 'warn q[bar]'; -e syntax OK

I vote bug.

---
$world=~s/war/peace/g


Comment on Re^2: Bug in perl command line processing?
Download Code
Re^3: Bug in perl command line processing?
by davido (Archbishop) on May 22, 2012 at 21:34 UTC

    The -e1 is unnecessary.

    That seems to be because perl sees the 'e' in 'foo e eval...' as an -e command line switch. Change it to something else besides 'e' and the behavior changes.

    It sort of feels like the same sort of exploit one should worry about when using the two-arg open unsafely, passing user data to a database without placeholders, or instantiating user data as variable names.


    Dave

      Yes, but to me that is THE bug.

      ---
      $world=~s/war/peace/g

        Absolutely.

        BTW: It doesn't seem to propagate into full-fledged scripts like this:

        #!/usr/bin/perl -i'foo e eval "warn q[bar]" ' 1;

        From what I can tell, -i has to actually appear on the command-line, which hopefully self-limits its significance as a tool for exploit.


        Dave

Re^3: Bug in perl command line processing?
by sauoq (Abbot) on May 22, 2012 at 21:42 UTC
    The -e1 is unnecessary.

    Yes, sorry. I should have explained my intent... I was showing that by adding the ';' to the OP's you could include -e1 without an error.

    -sauoq
    "My two cents aren't worth a dime.";

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (9)
As of 2014-08-02 02:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Who would be the most fun to work for?















    Results (53 votes), past polls