print( "Creating a slide\n" ); my $slide = $ppt->Slides->Add(1, ppLayoutBlank); $ppt->SaveAs($filename);