iwgen problem

er_anant

Hi all,

I am trying to use iwgen command using an external task like this

my $filepath = "y:\\default\main\PlayGrnd\kanant\WORKAREA\kanant\\".@files[$count];

my $tplFile = "y:\\default\\main\\PlayGrnd\\kanant\\WORKAREA\\kanant\\templatedata\\MyCategory\\Books\\presentation\\htm.tpl";

my $genFile = "y:\\default\\main\\PlayGrnd\\kanant\\WORKAREA\\kanant\\published\\generation.htm";


`$iwhome\\bin\\iwgen -t $tplFile -r $filepath $genFile`;

the output file is generated at the desired location but is empty.
when i am looking through lo file it gives me an error .....

"
ERROR:00920: Object being looked up was not found
\default\main\PlayGrnd\kanant\WORKAREA\kanant\published\generation.htm: Not a mingled file ".

Please help me out.

Adam Stoller

Hi all, I am trying to use iwgen command using an external task like this my $filepath = "y:\\default\main\PlayGrnd\kanant\WORKAREA\kanant\\".@files[$count]; my $tplFile = "y:\\default\\main\\PlayGrnd\\kanant\\WORKAREA\\kanant\\templatedata\\MyCategory\\Books\\presentation\\htm.tpl"; my $genFile = "y:\\default\\main\\PlayGrnd\\kanant\\WORKAREA\\kanant\\published\\generation.htm"; `$iwhome\\bin\\iwgen -t $tplFile -r $filepath $genFile`; the output file is generated at the desired location but is empty. when i am looking through lo file it gives me an error ..... " ERROR:00920: Object being looked up was not found \default\main\PlayGrnd\kanant\WORKAREA\kanant\published\generation.htm: Not a mingled file ". Please help me out.

You are using fie system paths where vpaths are expected; You appear to be inconsistently using double-back-slashes, so if what you posted is accurate to what you used - you have errors there. I strongly recommend that you always use forward-slashes as it is far less confusing in the long run; You don't capture the output from the command, which is almost always a mistake, along with not checking the return / exit code.

Given that - what happens if you run the following code:

...
my $filepath = "/default/main/PlayGrnd/kanant/WORKAREA/kanant/" . $files[$count];
my $tplFile  = "/default/main/PlayGrnd/kanant/WORKAREA/kanant/templatedata/MyCategory/Books/presentation/htm.tpl";
my $genFile  = "/default/main/PlayGrnd/kanant/WORKAREA/kanant/published/generation.htm";
my $results  = qx($iwhome/bin/iwgen -t $tplFile -r $filepath  $genFile 2>&1);
if ($?) {
    die "ERROR: $results";
}
...