# use strict;
# use warnings;
# use Time::HiRes qw(sleep);
# use Test::WWW::Selenium;
# use Test::More "no_plan";
# use Test::Exception;
#  
# my $sel = Test::WWW::Selenium->new( host => "localhost", 
#                                     port => 4444, 
#                                     browser => "*firefox", 
#                                     browser_url => "http://localhost:28080/" );
#  
# my $s = $sel->open_ok("/interop/index.jsp");
# print " \n Test Script \n ";
# print " \n \n my var $s \n \n";
# $sel->set_speed("1000");        # without this line, everything will error out.
# $sel->wait_for_page_to_load_ok("100000");
# sleep (50);
# $sel->type_ok("bpm.Logon.1.txtPassword", "password");
# $sel->click_ok("bpm.Logon.1.btnLogon");