backticks vs system

Bhargav Coca

I am on TS 6.7.2 and OD 6.2.1 on Windows 2003. We have a tpl which does a Data Deploy on preview/generate. For some reason the code doesn't execute and always returns 256 (Which is 1 ) and doesn't return anything when using backticks. Can anyone point out a hard way to debug this? Here is my code snippet.

[html]
my $dataCMD = "$ddhome\\bin\\iwodcmd.exe start $ddcfg -k iwdd=preview -k mybasearea=$myBaseArea -k mytemplatepath=$path";
print LOGFILE "Data CMD: $dataCMD\n";
my $dataResult = system($dataCMD);
[/html]

All my variables are perfectly defined, if i take the variable $dataCMD from the logfile and run it from command line everything works fine, so my problem is last line in the snippet. Is there a manadatory or forcing the system to execute the line?

Thank You

Adam Stoller

I am on TS 6.7.2 and OD 6.2.1 on Windows 2003. We have a tpl which does a Data Deploy on preview/generate. For some reason the code doesn't execute and always returns 256 (Which is 1 ) and doesn't return anything when using backticks. Can anyone point out a hard way to debug this? Here is my code snippet. [html] my $dataCMD = "$ddhome\\bin\\iwodcmd.exe start $ddcfg -k iwdd=preview -k mybasearea=$myBaseArea -k mytemplatepath=$path"; print LOGFILE "Data CMD: $dataCMD\n"; my $dataResult = system($dataCMD); [/html] All my variables are perfectly defined, if i take the variable $dataCMD from the logfile and run it from command line everything works fine, so my problem is last line in the snippet. Is there a manadatory or forcing the system to execute the line? Thank You

You say it didn't return anything with backticks - but you don't show code using backticks - system() only returns an exit status.

I strongly recommend switching all path separators from '\' to '/' and using qx() [same as backticks] and redirecting STDERR to STDOUT - e.g.:

...
$ddhome =~ tr|\\|/|;
my $dataCMD = "$ddhome/bin/iwodcmd.exe start $ddcfg -k iwdd=preview -k mybasearea=$myBaseArea -k mytemplatepath=$path";
print LOGFILE "Data CMD: $dataCMD\n";
my $dataResult = qx($dataCMD 2>&1);
print LOGFILE "RESULTS ($?): $dataResult\n";
...

See if you get any better diagnostic information in LOGFILE after doing that.