Win32::IE::Link - Mimic WWW::Mechanize::Link
use Win32::OLE; use Win32::IE::Link; my $agent = Win32::OLE->new( 'InternetExplorer.Application' ); $agent->Navigate( $uri ); # extract the links and wrap them as Win32::IE::Link my $doc = $agent->Document; my @links; for ( my $i=0; $i < $doc->anchors->lenght; $i++ ) { push @links, Win32::IE::Link->new( $doc->anchors( $i ) ); } # print the information from the links: foreach my $link ( @links ) { printf "%s as %s\n", $link->url, $link->text||""; }
The Win32::IE::Link 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.
Win32::IE::Link
$element is Win32::OLE object with a tagName() of IFRAME, FRAME, <AREA> or <A>.
$element
tagName()
Note: Although it supports the same methods as WWW::Mechanize::Link it is a completely different implementation.
WWW::Mechanize::Link
Returns hash ref of all the attributes and attribute values in the tag.
Returns the url from the link.
NOTE: The IE automation object only shows the interpreted results in the attributs collection, so url() and url_abs() will be the same.
Text of the link.
NAME attribute from the source tag, if any.
Tag name (either "A", "AREA", "FRAME" or "IFRAME").
The IE link object supports its own click() method, so make it available.
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.
To install Win32::IE::Mechanize, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Win32::IE::Mechanize
CPAN shell
perl -MCPAN -e shell install Win32::IE::Mechanize
For more information on module installation, please visit the detailed CPAN module installation guide.