Perl OpenOffice :: OODocヘッダー/フッタースタイルのテキストを変更する

Question

ODTファイルのフッターでテキストを変更する方法を理解しようとしています。フッターは、しかし、私はselectElementsByContentまたは任意の他の方法を使用してアクセスすることができないよう、のstyles.xmlに保管されています

my $a = odfContainer('test.odt'); 
my $styles = odfDocument(container => $a, part => 'styles'); 

foreach my $element ($styles->selectElementsByContent('mytest')) 
{ 
    #never runs... 

} 

ODT中のstyles.xmlはのようなものです：

<office:document-styles> 
    <office:master-styles> 
     <style:master-page> 
      <style:footer> 
       <text:p test:style-name="P49"> 
        mytest 
       </text:p> 
      </style:footer> 
     </style:master-page> 
    </office:master-styles> 
</office:document-styles> 

テキストを変更する正しい方法は何ですか：コンテンツですか？

Answer 1

私はをループにodfXPathを使用するようになってしまった：

my $ss = odfXPath(file => 'myfile.odt' , part => 'styles'); 
my $p =0; 
while (my $p = $ss->getElement('//text:p',$p)) 
{ 
if ($ss->getText($para) eq 'mytest') { $ss->setText($p,'foobar');} 
$p++; 
} 
$ss->save('mynewfile.odt');