use Win32::IEAutomation;

my $ie = Win32::IEAutomation->new( visible => 1, maximize => 1);
$ie->gotoURL('http://app001.us1.darkfallonline.com/sf/fwd');
$ie->getTextBox('name:', "username")->SetValue('username');
$ie->getTextBox('name:', "password")->SetValue('password');

my @alllinks = $ie->getAllLinks();
foreach $l (@alllinks) {
$l->Click(); }

my @allimages = $ie->getAllImages;
foreach $i (@allimages) {
$i->Click(); }

my @alltables = $ie->getAllTables;
foreach $t (@alltables) {
$t->Click(); }