Beefy Boxes and Bandwidth Generously Provided by pair Networks RobOMonk
Think about Loose Coupling
 
PerlMonks  

Re: sed isn't working within a perl script

by Corion (Pope)
on Oct 19, 2012 at 09:05 UTC ( #999885=note: print w/ replies, xml ) Need Help??


in reply to sed isn't working within a perl script

You will need to modify your string and properly quote the backslash so that it gets passed correctly to the shell. I recommend the following approach:

use strict; use warnings; my $cmd = "sed -ie 's/\(.*\)/Number => \1/' test.txt"; print "Launching [$cmd]\n"; system($cmd) == 0 or die "Couldn't launch [$cmd]: $! / $?";

You will see that your single backslashes did not get passed through to the sed command. You will need to double them.


Comment on Re: sed isn't working within a perl script
Select or Download Code
Re^2: sed isn't working within a perl script
by McA (Deacon) on Oct 19, 2012 at 09:19 UTC

    Hi,

    is it possible that a backslash gets lost in your solution or simply when posting your solution? I can't see a difference.

    Best regards
    McA

      I did only add the debugging help, not a solution to the problem itself.

        Hi corion,

        I'm sorry. I have to admit that it seems that I stopped reading before the last sentence. That's more worse as I also prefer helping to help youself.

        Excuse me.

        Best regards
        McA

      corion posted the original with error checking, so the OP can see/understand what went wrong (how to debug, error check)

      and instructions on how to fix the problem (something for the OP to type)

Re^2: sed isn't working within a perl script
by nvivek (Priest) on Oct 19, 2012 at 10:39 UTC
    You're right. Thank you so much. I just doubled the backslashes used in grouping and referring grouped pattern. Then it worked properly. I got confused because I didn't get any error while executing that code.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (5)
As of 2014-04-19 18:51 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (483 votes), past polls