CX or System

[TCPDump]

I am a fairly compete newbie to Perl, but am wanting to learn because it seems to give me more power than other things I am trying.

I have the following miniature program:

========================

# !/usr/bin/perl -w

system ("clear");

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

print "Password: $dbpass\n";

========================

What I am trying to do is run the system command:

password_decode $(grep "name=\"db\"" /opt/SecureSphere/etc/bootstrap.xml|cut -d\" -f4)

and then pass the output of this command to $dbpass

Then print $dbpass

Should be fairly simple.....but...I get the following:

sh: -c: line 0: unexpected EOF while looking for matching `"'
sh: -c: line 1: syntax error: unexpected end of file
System Password:

It clears the screen so line 3 is executing, and it seems to do line 7 correctly.....which seems to indicate the problem is in line 5

By itself the command runs without a problem and decodes the password involved. So there has to be something I am missing with the cx command.

Any help would be appreciated as I have a networking background, not a programming background, also if you have good references, let me know them.

Many, many thanks in advance

TCPDump