Re: Using Spreadsheet:WriteExcel or whatever else I need


The stupid question is the question not asked
	PerlMonks

Re: Using Spreadsheet:WriteExcel or whatever else I need

by stefbv (Curate)

on Oct 26, 2011 at 17:21 UTC ( [id://933943]=note: print w/replies, xml )

Need Help??

in reply to Using Spreadsheet:WriteExcel or whatever else I need

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