my $sth = $dbh->prepare( qq{SELECT * FROM $table}) 
          || die "Can't prepare statement: $DBI::errstr";