$doc= ooDocument(file => "./valahol/feltoltott.ods"); $doc->{'local_encoding'} = "iso-8859-2"; $doc->{'field_separator'}= ";"; $rows=$doc->getTableRows(0)-2; #valamiért két sorral többet állapít meg a valósnál $normsheet = $doc->normalizeSheet(0, $rows, 10); #soronként tíz oszlopnyi adatot feltételez, vagyis a hiányzó cellákat kiegészíti így: ;; $munkalap0= $doc->getTableText(0, $rows, 10); # csak az első munkalapot veszi vigyelembe chomp $munkalap0; open (FILE, ">./mashol/elmetett.csv"); print FILE $munkalap0; close FILE;