use OpenOffice::OODoc;

my $document = ooDocument(
    file   => 'outputfile.odp',
    create => 'presentation'
);

$document->createStyle(
    "TB",
    family     => "paragraph",
    parent     => "objectwithshadow",
    properties => {
        'style:vertical-pos'     => 'from-top',
        'style:horizontal-pos'   => 'from-left',
        'style:vertical-rel'     => 'page',
        'style:horizontal-rel'   => 'page',
        'style:font-size'        => '36pt',
        'style:font-weight'      => 'bold',

    }
);

$document->createStyle
                (
                "Colour",
                family  => 'paragraph',
                parent  => 'Standard',
                properties =>
                        {
                        'fo:margin-left'        => '2cm',
                        'fo:margin-right'       => '1.5cm',
                        'fo:text-align'         => 'justify',
                        'fo:background-color'   => '#ff00ff'
                        'fo:font-size'        => '36pt',
                        }
                );

$para = $document->createParagraph( "hello world", "Colour" );

$slide = $document->getDrawPage(0);

$document->createTextBox(
    attachment => $slide,
    size       => '10cm, 10cm',
    position   => '4cm,4cm',
    content    => $para,
    style      => 'TB',
);

$document->save;

##</code><code>##

$document->createStyle
                (
                "Colour",
                family  => 'paragraph',
                parent  => 'Standard'
);
$document->updateStyle(
                "Colour",
                family     => 'paragraph',
                parent     => 'Standard',
                properties =>
                        {
                        'fo:margin-left'        => '2cm',
                        'fo:margin-right'       => '1.5cm',
                        'fo:text-align'         => 'justify',
                        'fo:background-color'   => '#ff00ff'
                        'fo:font-size'        => '36pt',
                        }
                );