my ($sql, $dbh) = @_; my $sth=$dbh->prepare($sql); $sth->execute() or die "ERROR : execute error ",$sth->errstr(), "\n" ; my $returnArrayRef = $sth->fetchall_arrayref