my @domain_counts = GUI::DB::query ( $dbh,
    "SELECT date(now()), substr(addr,locate('@',addr)+1) as maildomain, count (*) as mailcount
     FROM mailing
     GROUP BY maildomain 
     ORDER BY mailcount DESC"
  );