DOS command in PERL script 2

[mstelmac]

Hello everyone, I am trying to kick off a DOS command from within my PERL script. I'm sure this is easy for you guys but it is killing me. I'm extremely new to PERL and more experienced with UNIX than dos. Can anyone suggest a solution, I think back slashes or ticks are in the worng place.

Thanks in advance !!!!
-Matt

system("start cqperl C:\\Program Files\\Rational\\ClearQuest\\Scripts\\cq_query.pl read_only read_only OECR OSCAR -j "Public Queries/Admin Dahlgren Weekly Download" -o C:\\Program Files\\Rational\\ClearQuest\\Scripts\\OSCAR\\db_output.txt");

 

[PaulTEG]

Does that command run from the command line in DOS?


Spend an hour a week on CPAN, helps cure all known programming ailments ;-)

 

[mstelmac]

Yes it runs fine from the command line.

 

[MikeLacey]

it looks like the unescaped embedded double quotes are getting you Matt, try this:

system("start cqperl C:\\Program Files\\Rational\\ClearQuest\\Scripts\\cq_query.pl read_only read_only OECR OSCAR -j \"Public Queries/Admin Dahlgren Weekly Download\" -o C:\\Program Files\\Rational\\ClearQuest\\Scripts\\OSCAR\\db_output.txt");

Mike

I am not inscrutable.

Want great answers to your Tek-Tips questions? Have a look at faq219-2884

 

[mstelmac]

Mike thanks for the help...... I tried what you suggested:

system("start cqperl C:\\Program Files\\Rational\\ClearQuest\\Scripts\\cq_query.pl read_only read_only OECR OSCAR -j

\"Public Queries/Admin Dahlgren Weekly Download\" -o C:\\Program

Files\\Rational\\ClearQuest\\Scripts\\OSCAR\\db_output.txt");

What is happening now is that it is ignoring the -j flag. Any thoughts?

v/r,
Matt

 

[PaulTEG]

Build up the string into a variable, and pass the variable to the system call

$var="start cqperl C:/Program Files/Rational/ClearQuest/Scripts/cq_query.pl read_only read_only OECR OSCAR -j \"Public Queries[COLOR=red]\[/color]/Admin Dahlgren Weekly Download\" -o C:/Program Files/Rational/ClearQuest/Scripts/OSCAR/db_output.txt";
print $var;
system($var);

The red / is an addition which could have been causing an issue

HTH
--Paul

Spend an hour a week on CPAN, helps cure all known programming ailments ;-)

 

[mstelmac]

Paul,
Thank you very much for your assistance. We just got it working by slashing out all of the bad characters. Here is a working version:

system("start cqperl \"C:\\Program Files\\Rational\\ClearQuest\\Scripts\\cq_query.pl\" read_only read_only OECR OSCAR -j \"Public Queries\/Admin Dahlgren Weekly Download\" -o \"C:\\Program Files\\Rational\\ClearQuest\\Scripts\\OSCAR\\db_output.txt\"");

Thanks Paul !!!!!!!
-matt

 

[MikeLacey]

cool *s*

Mike

I am not inscrutable.

Want great answers to your Tek-Tips questions? Have a look at faq219-2884