#!/usr/bin/env perl -l

use strict;
use warnings;

use OpenOffice::OODoc::Meta;

my $meta = OpenOffice::OODoc::Meta::->new(file => 'pm_1156099_test.odt');

print 'Author:  ', $meta->creator();
print 'Title:   ', $meta->title();
print 'Created: ', $meta->date();

##</code><code>##

Author:  Ken Cotterill
Title:   PM 1156099 Test Document
Created: 2016-02-25T15:23:56