Select Code to Download

my $sql = 'SELECT DP1,DP2 FROM Table1';
    my $sth = $dbh->prepare($sql);
    my $rc = $sth->execute || &pl_fatalSQLError($sql,$DBI::errstr);
    my $resultsArrayRef = $sth->fetchall_arrayref({});# <-- nothing ha
+ppens past here
    $sth->finish();

my $sql = 'SELECT * FROM Table1';
    my $sth = $dbh->prepare($sql);
    my $rc = $sth->execute || &pl_fatalSQLError($sql,$DBI::errstr);
    my $resultsArrayRef = $sth->fetchall_arrayref({});
    $sth->finish();