Slash Boxes
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
More | Login | Reply
Loading... please wait.
  • Here is some code to do the screen capture part:

    #!/usr/bin/perl -w

    use strict;
    use Win32::Clipboard;
    use Win32::GuiTest qw(FindWindowLike SetForegroundWindow SendKeys);

    # Find an open Word document
    my @windows = FindWindowLike(0, qr/Microsoft Word/);

    # Bring Word to the foreground (with focus)
    for (@windows) {
        SendKeys('%{PRTSCR}'); # Alt Print Screen

    # Get the image from the clipboard.
    my $screen = Win32::Clipboard::GetBitmap()

  • If you needed screenshots of them, could you not get the characters you needed from the PDF Unicode Charts [] at []? Just a thought.

    • Yes, that would work. However, with a couple of hundred characters, the amount of time and energy necessary for that would have been as much as the first option (entering them manually as screenshots).

      Fortunately, Andrew wrote a macro and Jessamyn figured out a way to copy and paste through a different application. Problem solved.