my $statement = "select name_field from table where name_field = '$NAME' limit 1";
my $sth = $dbh->prepare($statement);
$sth->execute or die( $sth->errstr );
my @row_ary = $sth->fetchrow_array;
if( @row_ary ){
	$sth->finish;
	return 1;
} else {
	$sth->finish;
	return 0;
}