sub closeIE{
	my $self = shift;
	my $agent = $self->{agent};
	$agent->Quit;
}