use Win32::IE::Mechanize;
use Data::Dumper;
$ie = Win32::IE::Mechanize->new(visibile=>1);
$ie->get('http://google.com');
sleep(4);
print Dumper($ie);