my $stmt = "SELECT * FROM users WHERE $searchfield = ?";
    warn("statement =  '$stmt'");	
    my $sth = $dbh->prepare ($stmt) or die "Error Preparing:\n" . $stmt . "\nDBI returned: \n", $dbh->errstr;
    $sth->execute($searchterm) or die "Unable to execute query: " . $sth->errstr;	
    my $refresult = $sth->fetchrow_hashref();
    my $count = $sth->rows;
    warn("count = '$count'");
    if ($count == 0) {
       warn("Failed Search: '$searchfield' equal to '$searchterm' "); 
       exit(1);
     }
    else {
       warn("count = '$count'");
       my $json = JSON->new; 
       $json->canonical(1);
       $json = encode_json($refresult);
       print $json;
       warn("Finished print '$json_str'");	
       exit(0);
      }