Написал тут пару дней назад скриптец:
#!/usr/bin/perl -w
use strict;
use OpenOffice::OODoc::Text;
use OpenOffice::OODoc qw(odfLocalEncoding);
my $doc = OpenOffice::OODoc::Text->new(file => 'report.odt');
odfLocalEncoding('UTF-8');
print $doc->getCellValue(0,0,0),"\n";
А оно мне вместо русского текста знаки вопроса выводит(спросить чего хочет?).
Как это можно пролечить? Нужно из ООофисного документа выдирать содержание некоторых таблиц, желательно на чудном перле.
