sub StartSelenium {
	my ($self, $browser, $site) = @_;
	
	system(
		1,
		"java",
		"-jar",
		$self->{_Selenium}
	);
	
	my $sel = Test::WWW::Selenium->new(
		host => 'localhost',
		port => 4444,
		browser => $browser,
		browser_url => $site
	);
	
	$sel->start();
	
	return $sel;
}

sub KillSelenium {
	my ($self, $sel) = @_;
	
	$sel->stop();
	$sel->do_command('shutDownSeleniumServer');
	
	return 1;
}