Kumara - predecessor to Koha
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

22 lines
302 B

  1. #!/usr/bin/perl
  2. #script to delete biblios
  3. #written 2/5/00
  4. #by chris@katipo.co.nz
  5. use strict;
  6. use C4::Search;
  7. use CGI;
  8. use C4::Output;
  9. use C4::Acquisitions;
  10. my $input = new CGI;
  11. #print $input->header;
  12. my $biblio=$input->param('biblio');
  13. delbiblio($biblio);
  14. print $input->redirect("/catalogue/");