setting meta data on pt

madmax

hi everybody ,

i am tring to set metadata on pt. i code -----
<iw_perl><![CDATA[
use TeamSite::Config;
### Set the extended attributes ###
my $OFile = iwpt_get_ofile_name();
$OFile =~s#\\#/#g;
open(MYFILE, ">$OFile"); #We have to create our output file before setting the attributes
close(MYFILE);
my $IWHome = TeamSite::Config::iwgethome();
$IWHome =~s#\\#/#g;
my $IWExtAttr = "$IWHome/bin/iwextattr.exe";

my $SetAuthor = "$IWExtAttr -s \"News Author\"=\"". iwpt_dcr_value('dcr.newsAuthor') ."\" $OFile";
my $SetPubDate= "$IWExtAttr -s \"Published Date\"=\"". iwpt_dcr_value('dcr.newsPubdate') ."\" $OFile";

system($SetAuthor);
system($SetPubDate);
]]></iw_perl>

but still it's not setting any metadata any advise.

teamsite 6.5
win 2003

iwovGraduate

You get any errors ?
You might want to try debugging it by checking what the exact command is and trying to capture (and print) the output when executed.
What is the value of $SetAuthor and $SetPubDate just prior it is executed ? What happens if you run the same exact command from a shell/commandline ?

Edited by iwovGraduate on 04/21/05 07:22 AM (server time).