Select Code to Download

my $result = $dbh->selectall_arrayref(
   "SELECT application.name FROM application, group, subgroup, app_sub
+group WHERE
...
foreach (@$result) {
   print @$_;
}

my $result = $dbh->selectall_arrayref(
   "SELECT DISTINCT(application) FROM table_name WHERE
...
foreach (@$result) {
   print @$_;
}