最速インターフェース研究会 :: PerlでIEの履歴にアクセスする方法

こんなんで出来た。 use strict; use Win32::OLE; use Data::Dumper; my $wshell = Win32::OLE->new('Shell.Application') or die "oops\n"; my $HISTORY_FOLDER = 0x22; my $history_dir = $wshell->Namespace($HISTORY_FOLDER); my $url_list = scan_folder($history_dir, []); print Dumper $url_list; sub scan_folder{ my ($folder, $ref) = @_; my $items = $folder->items; for(my $i = 0;$i < $items->count; $i++){ my $item = $it

[webmarksjp]

language

[shidho]

windowsでperlってのも乙なモンだ。

[kdaiba]

よく考えたらIE使ってなかった

[akiyan]

Win32::OLE

[uricle]

ほほうー

[pipehead]

Win32::OLE