Select Code to Download

if($c->param("searchTerm")) {
  while ($row = $q->fetchrow_hashref) {
...
} else {
    $results .= "<b>No results matched your asset query.</b>";
}

#!perl

...
print $results;
print $tail;