use strict;
use warnings;
use Win32::IE::Mechanize;

my $url = 'http://www.cnn.com/';
my $timeout = 20;
my $ie1 = Win32::IE::Mechanize->new(visible => 1,
				    	left => 0,
				    	top => 0,
				    	height => 950,
				    	width => 1280,
				  );

$ie1->get($url);
for (0 .. $timeout*20) {
    last if $ie1->{agent}->ReadyState >= 4;
    sleep 0.05;
}
sleep 5;
$ie1->follow_link( url_abs_regex => qr/health/ );

__END__

__DATA__
ERROR:
Can't locate object method "url_abs" via package 
"Win32::IE::Link" at D:/Perl/site/lib/Win32/IE/Mechanize.pm line 514.