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

Re: CX or System

by Eliya (Vicar)
on Apr 04, 2012 at 19:03 UTC ( #963510=note: print w/replies, xml ) Need Help??

in reply to CX or System

qx acts like a double-quoted (interpolated) string, so you need to escape stuff, i.e.

my $dbpass=qx{ password_decode \$(grep "name=\\"db\\"" /opt/SecureSphe +re/etc/bootstrap.xml|cut -d\\" -f4) };


Alternatively, declare your command using a non-interpolating quoting mechanism, and then pass it to qx{}:

my $cmd = q{ password_decode $(grep "name=\"db\"" /opt/SecureSphere/et +c/bootstrap.xml|cut -d\" -f4) }; my $dbpass = qx{ $cmd };

Hint: replace qx{} with qq{} and print it, and you'll see what the shell sees with your version, e.g.

password_decode 999 101 104 814 999 1035 1070grep "name="db"" /opt/Sec +ureSphere/etc/bootstrap.xml|cut -d" -f4)

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://963510]
[talexb]: That would have been interesting .. phone interview with BigCorp while the piano tuner does his magic. Awkwardness successfully averted!

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (7)
As of 2017-11-17 18:43 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (270 votes). Check out past polls.