#!/usr/bin/perl use ooolib; $doc = new ooolib("sxw"); $doc->oooSet("builddir", "."); $doc->oooSet("author", "The Author"); $filename = $doc->oooGenerate("basic.sxw");