use Test::WWW::Selenium

my $sel = Test::WWW::Selenium->new( 
   host => "your server's ip",
   port => 4444,
   browser => "*firefox",
   browser_url => "http://www.google.com",
);

# your test script goes here