[scpubgit/Test-Harness-Selenium.git] / t / basic.t

#!/usr/bin/perl
use strict;
use warnings;

use lib 'lib';
use Test::Harness::Selenium;
use Test::More;

my $s = Test::Harness::Selenium->new({
    host => 'localhost',
    port => $< + 60_000,
    browser_url => 'http://www.google.com',
    browser => shift,
});
$s->test_directory(shift);
done_testing;
Commit	Line	Data
3749d2e5	1	#!/usr/bin/perl
	2	use strict;
	3	use warnings;
	4
	5	use lib 'lib';
	6	use Test::Harness::Selenium;
a5dd2803	7	use Test::More;
3749d2e5	8
	9	my $s = Test::Harness::Selenium->new({
	10	host => 'localhost',
a5dd2803	11	port => $< + 60_000,
3749d2e5	12	browser_url => 'http://www.google.com',
	13	browser => shift,
	14	});
a5dd2803	15	$s->test_directory(shift);
a5dd2803	16	done_testing;