Select Code to Download

use OpenOffice::OODoc;
my $document=odfDocument(file=>'test.ods');
...
    $document->updateCell("Sheet1",$rr,0,$rr."0");
}
$document->save;