blog.nomadscafe.jp

今日はsearch.cpan.orgが止まっていてとても仕事がやりにくいのだが、
blog.bulknews.netさんの記事にあった、Win32::CaptureIE、インストール＆動作しました。

環境は、ActivePerl build 810です。

Win32::OLEは、

# ppm install Win32-OLE

でＯＫ。

Image::Magickは、ここからダウンロードして普通にインストール。
インストール後、環境変数「MAGICK_HOME 」の設定が必要になります。Cepheidさんのページを参考にしました。

Win32::Screenshotのppdはこちらにあります。

ppm install http://theoryx5.uwinnipeg.ca/ppms/Win32-Screenshot.ppd

でインストールできました。

肝心のWin32::CaptureIEはCaptureIE.pmを正しいところへコピーで動きます。

#!/usr/bin/perl

use strict;
use Win32::CaptureIE;

StartIE(width=>400,height=>250);
Navigate('http://www.yahoo.co.jp/');
my $img = CaptureArea(0,0,400,250);
$img->Write("ie-elem.png");
QuitIE;