Re^5: The DOM of IE

Seems to work

#!/usr/bin/perl --

use strict;
use warnings;

{
    use Win32::OLE qw( in );

    my $shell = Win32::OLE->new('Shell.Application')
      or die "ERROR ", Win32::OLE->LastError();

    my @ies = grep { $_->FullName =~ /iexplore\.exe$/ } in $shell->Win
+dows;

    my $url = 'about:blank';
    $url = 'about:mozilla'; # :D

    for my $eye (@ies) {
        $eye->{Offline} = 1;
        $eye->{Visible} = 1;
        $eye->Navigate( $url );
    }
}

__END__
http://msdn.microsoft.com/en-us/library/aa752043(VS.85,loband).aspx
http://en.wikipedia.org/wiki/About:_URI_scheme
[download]

Comment on Re^5: The DOM of IE Download Code

Replies are listed 'Best First'.
Re^6: The DOM of IE by Anonymous Monk on Jun 30, 2009 at 10:12 UTC
`use Win32::OLE qw( with ); with( $eye , qw! Offline 1 Visible 1 ! );` [download]	[reply] [d/l]