Required reading

You could basically have:

sub _fetchall {

   my ($self,%arg) = @_;

   my $stm = "select * from $arg{table}";
   return $dbh->selectall_arrayref($stmt, {Slice => {}});
}
[download]

No need to prepare or excute. It's all done for you.