#!/usr/bin/perl use strict; use warnings; use lib 'lib'; use Test::Harness::Selenium; my $s = Test::Harness::Selenium->new({ host => 'localhost', port => 4444, browser_url => 'http://www.google.com', browser => shift, }); $s->run_tests_for(shift);