8 my $biblionumber = $input->param('biblionumber');
9 my $biblioitemnumber = $input->param('biblioitemnumber');
11 if (! $biblionumber) {
12 print $input->redirect("/catalogue/");
14 } elsif (! $biblioitemnumber) {
15 print $input->param("detail.pl?type=intra&bib=$biblionumber");
18 &deletebiblioitem($biblioitemnumber);
20 print $input->redirect("detail.pl?type=intra&bib=$biblionumber");