Problem in generating XMl through external task ik

sanjeevappa

Hi,

This is the code iam running through external task in work flow:

#!/usr/bin/perl
use Data:umper;
use XML:imple;
my $fh="C:/iw-home/file.txt";
open OUT, ">>$fh" or die "Cannot open $fh for write :$!";
print OUT "1\n";
$obj = new XML:imple;
print OUT "2\n";
$struct=$obj->XMLin(".\doc.xml");
print OUT "3\n";
print OUT Dumper($struct);

The command input for external task is: C:\iw-home\iw-perl\bin\perl C:\iw-home\WFScripts\xml.pl

After running this when i open file.txt, the file contains 1 and 2, by this way iam finding problem in : $struct=$obj->XMLin(".\doc.xml");
this line:

Any help to execute this script so that output of Dumper($struct) should be written to the file.txt.

You can use any XML file for this instead of doc.xml.


Thankful for any help.

Adam Stoller

I see a number of issues here:

" yet the script you're showing us was clearly written on Unix and begins with #!/usr/bin/perl
In general, this shouldn't cause any problems, but it would be much better if the #! line reflected the location of Perl being using on the current system.
• You didn't indicate which version of TeamSite you're using - so we don't know if you're using perl 5.005_03 [ancient] or 5.8.2 [recent].
  In the case of the former - you should have a '-w' added to the end of the #! line; in the case of the latter, you should add the pragma 'use warnings;' added beneath the #! line.
  In either case you should also have the pragma 'use strict;' added beneath the #! line
  If you had done so - you'd have gotten error messages about the lack of declaration for the variables $obj and $struct in your code.
  
• Your open statement uses '>>$fh' which is append but the die message says "write" -the two should agree with one another.
  
• You say you want to get the output of Dumper($struct) written to file.txt -- as near as I can tell, that should already be happening, however if - as you're saying - the problem is happening in the line:$struct=$obj->XMLin(".\doc.xml"); then it is quite possible that $struct is either undef or empty and thus there is nothing for Dumper() to output.
  
• The biggest problem I see with:$struct=$obj->XMLin(".\doc.xml");is that you are assuming the location of the file "doc.xml" as being in the current directory (".\") and using a single-backslash within double-quotes.
  At the very least - you should try changing the line to be either:$struct=$obj->XMLin("./doc.xml");or$struct=$obj->XMLin(".\\doc.xml");or$struct=$obj->XMLin('.\doc.xml');More likely - you should specify the exact location of the file "doc.xml" within the script rather than using the ./ notation.

Hopefully that will help you get past your current issues.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com