#!/usr/bin/perl

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

my $ie = Win32::IE::Mechanize->new( visible => 1 );   
my $url ='file:///c:/test.html';
$ie->get($url); 
$ie->follow_link(url => "javascript:subForm('UA_Signin','signOff')");