my %SEARCH  = (
	num1  => [ param("num1"),   \&INTEGER ], 
	email => [ param("email"),  \&EMAIL   ], 
);