use Win32::IE::Mechanize;
use Time::HiRes;
my $ie = Win32::IE::Mechanize->new( visible => 1 );
$url = 'http://www.yahoo.com/';
$ie->get( $url );
sleep(5);
print $ie->content;
$ie->close;