#!/usr/bin/perl
use strict;
use warnings;
use Win32::IE::Mechanize;
    my $ie = Win32::IE::Mechanize->new( visible => 1 );   
	my $url ='http://url/go';
	  $ie->get( $url );

$ie->follow_link (text =>"subForm('UA_Signin','signOff')")|| die"can't find text $!";

# $ie->find_link (url=>"javascript:subForm('UA_Signin','signOff')");