Select Code to Download

print "Content-type: text/plain\n\n";

...
print "\n$point $usrn\n";
print "SELECT idUSRN FROM USRN ORDER BY ST_Distance_Sphere( ST_GeomFro
+mText( '$point', 4326 ), center ) LIMIT 1";
exit;