Sometimes, perlapp exe's are ridiculously huge, even when using --xclude. Using Tk, for instance, will add about 900K to a compressed perlapp exe. Fortunately, you can save some of that space. Here's how you do it:
1) run perlapp with the --verbose and redirect its output to res.txt. e.g. perlapp --verbose --xclude script.pl > res.txt
2) run the script below
3) open size.txt to see a list of all the files built into your archive, sorted by size.
Then you can try to weed out unnecessary files. For some reason (or maybe no reason), when you say use Tk;, the site/lib/Tk/demos directory is built into your exe. This directory is around 800KB and removing it can save you a considerable amount of space in the final executable. I would recommend simply moving the demos folder out of site/lib/Tk instead of deleting it. Note that the widget demo will not work until you move the demos directory back in.
Enjoy!
open(RES, "<res.txt");
open(SIZES, "+>size.txt");
while(<RES>)
{
next unless /^\+\+\+/;
($file) = /\+\+\+ (.*)\n/;
$sizes{-s $file} = $file;
}
for(sort {$a <=> $b} (keys(%sizes)))
{
print SIZES "$_ - $sizes{$_}\n";
}
close(SIZES);
close(RES);