For anyone watching ... this worked
sub page_setup { my ($self, $options) = @_; $options = {} unless ref $options eq 'HASH'; # PPT.PageSetup.SlideSize = ppSlideSizeA4Paper # Const ppSlideSizeA4Paper = 3 # Microsoft constants # # Name Value Description # ppSlideSize35MM 4 35MM # ppSlideSizeA3Paper 9 A3 Paper # ppSlideSizeA4Paper 3 A4 Paper # ppSlideSizeB4ISOPaper 10 B4 ISO Paper # ppSlideSizeB4JISPaper 12 B4 JIS Paper # ppSlideSizeB5ISOPaper 11 B5 ISO Paper # ppSlideSizeB5JISPaper 13 B5 JIS Paper # ppSlideSizeBanner 6 Banner # ppSlideSizeCustom 7 Custom # ppSlideSizeHagakiCard 14 Hagaki Card # ppSlideSizeLedgerPaper 8 Ledger Paper # ppSlideSizeLetterPaper 2 Letter Paper # ppSlideSizeOnScreen 1 On Screen # ppSlideSizeOverhead 5 Overhead if ( defined $options->{SlideSize} ) { $self->presentation->PageSetup->{SlideSize} = $options->{SlideSize +}; print "PowerPoint.pm(): set SlideSize=2\n"; } if ( defined $options->{SlideWidth} ) { $self->presentation->PageSetup->{SlideWidth} = $options->{SlideWid +th}; print "PowerPoint.pm(): set SlideWidth=" . $options->{SlideWidth} + . "\n"; } if ( defined $options->{SlideHeight} ) { $self->presentation->PageSetup->{SlideHeight} = $options->{SlideHe +ight}; print "PowerPoint.pm(): set SlideHeight=" . $options->{SlideHeigh +t} . "\n"; } }

Of course, I'll remove the print statements.

Now ... if only I knew how to update a module for distribution ...

In reply to Re^3: Win32::PowerPoint extension by EnzoXenon
in thread Win32::PowerPoint extension by EnzoXenon

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.