Hi PerlMonks,
running this little script in 'non-pp'-mode works fine. 'pp'-mode does'nt like it. I am sure, some modules have to be included - but I can't figure out which ones.
Would somebody be so kind to point me in the right direction. Thanks in advance!

Linux Mint 14 using Perl v5.14.2

=========== sample_getSaveFile.pm ====================================
+=========

#!/usr/bin/perl

use Tk;

$mw = MainWindow->new(-title => 'sample_getSaveFile');

my $DOC_filetypes = [['Text', '.txt'], ['Any File', '.*']];

my $i = $mw->getSaveFile(-defaultextension => '.myown',

                        -filetypes => $DOC_filetypes,

                        -initialdir => '.',

                        -initialfile =>  'xyz',

                        -title => 'getSaveFile');

if (defined $i) {

    print 'Successful getSaveFile';

}

else {

    print 'Error on getSaveFile';

}

MainLoop;

=========== PAR Packager, version 1.012 (PAR version 1.005) ==========
+==============

pp -C --vvv -L pp_logifle.txt -o sample_getSaveFile sample_getSaveFile
+.pm

=========== running sample_getSaveFile ===============================
+==============

Can't locate Tk/Bitmap.pm in @INC (@INC contains: CODE(0x8c40cfc) CODE
+(0x8c410bc)) at Tk/Widget.pm line 270.
 at Tk/Widget.pm line 203

=========== after including 'use Tk::Bitmap;', running 'pp' and execut
+ing 'sample_getSaveFile'  the following message appears: ========

XS_Tk__Callback_Call error:must specify one of -data, -file, -array or
+ -id at Tk/Image.pm line 21.

Tk::Error: must specify one of -data, -file, -array or -id at Tk/Image
+.pm line 21.
 Tk callback for image
 Tk::Image::new at Tk/Image.pm line 21
 Tk::Image::__ANON__ at Tk/Image.pm line 63
 Tk::FBox::Update at Tk/FBox.pm line 404
 Tk::After::once at Tk/After.pm line 90
 [once,[{},after#13,idle,once,[{},Update]]]
 ("after" script)

======================================================================
+=================
[download]