With pp you can create executables with "non-core" modules included.

Not by my experience.
Maybe it's possible to tell it to include modules,
like the cpan page says, but I've never figured out how exactly ^^.
Thx anyway

Update:
I figured it out it works !
I did needed the -x as proposed in Re^5: print-screen without non-core modules ?
but as I said before I couldn't figure out how to use this -x line.
After using -x 2 unidentified strange files were created and than the pl was opened in the very terminal in which the -x was entered (no new terminal was opened).
After waiting for a long time seeing nothing changes (that is, no exe is created),
I closed the terminal by hitting the X button on it's window.
What was actually happening is the 2 files were a mid process part of creating the exe, as was running the pl in that terminal to gather run-time dependencies, otherwise undetectable.
While the pl was running I needed to use the very part(s) of the program the experienced problems in the exe version created without the -x line.
Once that as done, the dependencies were considered.
Than the pl needed to be properly closed (by internal process, that is without closing the terminal),
only than the 2 files (along with the run-time dependencies) merged into a beautiful fully functioning exe file.
Just to bad the Cpan page of "pp" doesn't explain this process as usage instructions.

What part of the documentation didn't make sense? What did you try which didn't work as you expected?

The utility "import" from ImageMagick ( installed on most machines ) can capture the root window to a "blob", which can be manipulated by Imager or ImageMagick.

#!/usr/bin/perl
use warnings;
use strict;
use Image::Magick;

my $blob = `import -window root jpg:-`;   
#my $blob = `import -`;  #postscript produced
#print "$blob\n";

# now $blob is in memory and you can do what you
# want with it.

my $output = Image::Magick->new(magick=>'jpg');
$output->BlobToImage( $blob );
#$output->Resize(geometry=>'160x120');
$output->Write( $0.'.jpg');
# png works too

# or use Imager 
use Imager;

# Convert image 
my $img = Imager->new;
$img->read(data=>$blob, type=>'jpeg')
           or die "Cannot read: ", $img->errstr;

#See perldoc Imager::Transformations
my $rot20 = $img->rotate(degrees=>20);

$rot20->write(file=>"$0-rot20.jpg", type=>'jpeg')
           or die "Cannot write: ",$rot20->errstr;
[download]

"ImageMagick ( installed on most machines )"

Nitpick: I wouldn't say most machines.

Hi
where can I find this for ActiveState Perl (Win)?

The ImageMagick binary, which contains the "import" utility, is at IM binary releases.

I'm not sure where the Window's perl module for ImageMagick can be found nowadays. Just so you are clear, there is a ImageMagick set of C libs and utilities ( cited above), and there is a PerlMagick Perl module. They are different entities.

---

I'm not really a human, but I play one on earth.
Old Perl Programmer Haiku ................... flash japh

Also see Imager::Screenshot.

See Windows screengrab with GD;

#!/usr/bin/perl
use warnings;
use strict;
use Gtk2 -init;

my $s = Gtk2::Gdk::Screen->get_default;
my $w = $s->get_root_window;

my $p = Gtk2::Gdk::Pixbuf->get_from_drawable (
            $w, undef, 0, 0, 0, 0, $s->get_width, $s->get_height);

$p->save ($0.'.jpg', 'jpeg', quality => 10);
[download]