my $filename = "c:\\temp\\testpower.ppt";