$list = '&list=distwhores';
$where = qq{WHERE dists > 0 $show
ORDER BY dists DESC,COALESCE(sec_centres::float/structures*100,0)ASC}
$list = '&list=distwhores';
$where = qq{WHERE dists > 0 $show
ORDER BY dists DESC,COALESCE(sec_centres::float/structures*100,0)ASC}