if (defined $checks{'value'}) {
	if (ref $checks{'value'} eq 'Regexp') {
		bail_out("Bad input.")
			unless ($checks{'data'} =~ $checks{'value'});
	} else {
		bail_out("Bad input.")
			unless ($checks{'data'} eq $checks{'value'});
	}
}