testingbot perl

gistfile1.pl

use Selenium::Remote::Driver;

#Input capabilities
my $extraCaps = { 
  "browser" => "internet explorer",
  "version" => "7",
  "platform" => "Windows"
};

my $key = "changeme";
my $secret = "changeme";
my $host = "$key:$secret\@hub.testingbot.com";

my $driver = new Selenium::Remote::Driver('remote_server_addr' => $host, 
  'port' => '80', 'extra_capabilities' => $extraCaps);
$driver->get('http://www.google.com');
$driver->find_element('q','name')->send_keys("TestingBot");
print $driver->get_title();
$driver->quit();

Selenium Installation from command line:

cpanm Selenium::Remote::Driver