sub errhand {
	if ($website eq "three"){
	next;
    }
	elsif ($website eq "five"){
	next;
    }
	elsif ($website eq "calnet-test"){
	next;
	}
	#elsif ($old_ip eq /\d\d.\d\d.\d\d\d){
	#next;
	#}
	#elsif ($new_ip eq /\d\d.\d\d.\d\d\d){
	#next;
	#}
	else{
		die, "ERROR - Format is 'deploy website old_ip new_ip || 'deploy [three; five;calnet-test] 21.01.001 22.02.002'"
	}
}