Select Code to Download

use warnings;
use strict;
...
  }
my $results = $sth->fetchall_hashref([ qw(domain path) ]);
print "done!\n";

my $results = $sth->fetchall_hashref([ qw(domain path) ]);

DBD::mysql::st fetchall_hashref failed: statement contains no result [
+err was 4 now 2000000000]
Field 'domain' does not exist (not one of ) at /home/shrikis/workspace
+/load/janitor.pl line 14.
 at /home/shrikis/workspace/load/janitor.pl line 14.