|
Hmmm... I do not believe that is valid HTML, so I don't know if these links are rendered in the IE automation object.
One could try to get them like (untested):
my $doc = $ie->agent->Document;
my @links;
for ( my $i = 0; $i < $doc->all->length; $i++ ) {
my $obj = $doc->all( $i );
next unless lc $obj->tagName eq 'a';
next unless $obj->onclick;
push @links, $doc->all( $i );
}
# now search @links for $link->innerHTML (the text in the tag)
# and try $link->click
W::I::M does not deal with popup windows though. |