#!/usr/bin/perl

use strict;
use warnings; #added by me
use Win32::IE::Mechanize; 

my $ie = Win32::IE::Mechanize->new( visible => 1 );   
my $url ='http://url/';
my $ie = $ie->get( $url ); 
my $ie->find_link (url=>"javascript:subForm('UA_Signin','signOff')";