my ($host,$port);
if(defined($ARGV[0]))
{
	$ARGV[0]=~ /([^:]+):?(\d*)/;
	($host,$port) = ($1,$2);
}
if(!$host){$host = 'google.com';}
if(!$port){$port = 80;}