print join(":", @$result) if ref $result;


##</code><code>##

  print ref($result) ? join(":", @$result) : "no results";