Abe Timmerman > Win32-IE-Mechanize-0.009 > Win32::IE::Image

Download:
Win32-IE-Mechanize-0.009.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  8
Open  3
Stalled  2
View Bugs
Report a bug
Module Version: 0.002   Source   Latest Release: Win32-IE-Mechanize-0.009_17

NAME Win32::IE::Image ^

Win32::IE::Image - Mimic WWW::Mechanize::Image

SYNOPSIS ^

    use Win32::OLE;
    use Win32::IE::Image;

    my $agent = Win32::OLE->new( 'InternetExplorer.Application' );
    $agent->Navigate( $uri );

    # extract the images and wrap them as Win32::IE::Image
    my $doc = $agent->Document;
    my @images;
    for ( my $i=0; $i < $doc->images->lenght; $i++ ) {
        push @images, Win32::IE::Image->new( $doc->images( $i ) );
    }

    # print the information from the images:
    foreach my $img ( @images ) {
        printf "%s as %s\n", $img->url, $img->alt||"";
    }

DESCRIPTION ^

The Win32::IE::Image object is a thin wrapper around the DOM-object supplied by the InternetExplorer.Application. It is implemented as a blessed reference to the Win32::OLE-DOM object.

METHODS ^

Win32::IE::Image->new( $element )

Create a new object, that implements url, base, tag, height, width, alt and name

$image->url

Return the SRC attribute from the IMG tag.

$image->tag

Return 'IMG' for images.

$image->width

Return the value width attrubite.

$image->height

Return the value height attrubite.

$image->alt

Return the value alt attrubite.

COPYRIGHT AND LICENSE ^

Copyright MMIV, Abe Timmerman <abeltje@cpan.org>. All rights reserved

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.