my $bookparam;
if (defined $cgi->param("book")) {$bookparam = $cgi->param("book")};