while ( $book_id = $sth->fetchrow_arrayref() ) {
    $booklist_1{ $book_id->[0] } = 1;
}