The following might be a solution in the (unlikely) situation when the file is in the "ODF" format. Only tested with a file created with LibreOffice.

It uses the ODF::lpOD module developed by Jean-Marie Gouarné and requires at least Perl v5.10.

use strict;
use warnings;
use 5.010_000;

use ODF::lpOD;

my $file = shift;

my $doc = odf_document->get($file);

my $table = $doc->get_body->get_table();
$table->read_optimize(TRUE);

$table->add_row(number => 1, before => 0, empty => 'true');

$table->get_cell(0,0)->set_text("Bonjour le monde !");

$doc->save();
[download]

Regards, Stefan