--- common.pm 2002/06/16 14:37:43 1.1 +++ common.pm 2002/06/16 15:26:13 1.2 @@ -1,7 +1,32 @@ #!/usr/bin/perl -w +#package common; + use strict; +$common::install_dir="/local/index"; +$common::mpsindex="/local/mps-5.3/bin/mpsindex -l 9 -b"; +$common::isis_data="/var/autofs/misc/isis_data/"; +#$common::isis_data="/mnt/20020606/Isis/Data/"; # doma + +$common::mps_header="V 5 3 +L hr-HR +F 700+ 1 Autor +F 200+ 2 Naslov +F 210 3 Izdavanje +F 225 4 Nakladnička cjelina +F 300+ 5 Napomene +F 330 6 Sadržaj +F 464 7 Analitički radovi +F 610 8 Ključne riječi +F 675 9 UDK +F 686 10 CC +F 990 11 Signatura +F 991 12 Inventarni broj +F 10 13 ISBN +"; + + #-------------------------------------------------------------------- # # mps_expand(nr,"space separated string");