# selectors items init
use strict;

# Loop through locations; for each location, run other perl scripts, passing a parameter to them
# that contains a part of the filename that will be created, the format, and the location codes
# separated by hyphens.
# They hyphens will be changed to pipes in the other script; when I put the pipes in this script
# it wouldn't work.

my $location;
my @locations = (	
	"libray-of-things,bk,that-thatu",
	"a-express,bk,abkx",
	"a-fiction,bk,abkx-7fic-7mcf-afic-fic-pbkn",
	"a-graphic-novels,bk,graph-grapm-grapn",
	"a-inspirational,bk,insp-inspm-inspn",
	"a-large-print,bk,larg-largm-largn-nlrmf-nlrmn-nwlrf-nwlrn-nlmcb,larb-larbn",
	"a-mystery,bk,7mys-7mysm-mys-pbknm",
	"a-romance,bk,pbkr",
	"a-sci-fi,bk,sf-7sf-7sfm",
	"anf-bio,bk,bio-nwbio-ovbio-nwovb",
	"anf-nonfiction,bk,mc-non-nwnon-nwov-nwovm-folio-ov-auto-moto",
	"av-audiobooks,bk,cdbk-cdbkn",
	"av-bluray,blu,bluf-blun-blut-blua,blus-blusn-blnw-blufo",
	"av-cd,cd,cclan-cclas-cconn-ccont-ccowe-ccown-cfolk-cfoln-chol-cjazn-cjazz-crock-crocn-cshon-cshow-rrb-crrbn-cfait-cfain-csoun-choln",
	"av-cd-holiday,cd,chol-choln",
	"av-cd-classical,cd,cclan-cclas",
	"av-cd-contemporary,cd,cconn-ccont",
	"av-cd-country,cd,ccowe-ccown",
	"av-cd-fait,cd,cfait-cfain",
	"av-cd-folk,cd,cfolk-cfoln",
	"av-cd-jazz,cd,cjazn-cjazz",
	"av-cd-rock,cd,crock-crocn",
	"av-cd-rb,cd,crrb-crrbn",
	"av-cd-show,cd,cshon-cshow",
	"av-cd-sound,cd,csoun",
	"a-dvd-express,dvd,blme-dvdme",
	"av-dvd-feature,dvd,dvde-dvden",
	"av-dvd-foreign,dvd,dvdf-dvdfn",
	"av-dvd-nf,dvd,dvdn-dvdnn-dvdd-dvddn",
	"av-dvd-tv,dvd,dvdt-dvdtn-dvds-dvdsn",
	"av-mp3,mp3,mp3",
	"av-playaway,bk,pla-plafi-plamy-plan-plar-plasf",
	"j-big,bk,jbigb",
	"j-bio,bk,jbios",
	"j-bluray,blu,bluj",
	"j-bocd,bk,jcdbk",
	"j-caldecott,bk,jcald-jcaln",
	"j-cd,cd,jcd",
	"j-chapter,bk,jcha",
	"j-discovery,bk,jdkit",
	"j-dvd,dvd,dvdj-dvdjn",
	"j-express,bk,cbkx",
	"j-fairy,bk,jft",
	"j-fic,bk,jfic-jmcf-jbkx",
	"j-graphic,bk,jgram-jgrap",
	"j-kits,bk,jkit-jks1-jksp",
	"j-newbery,bk,jnewb-jnewn",
	"j-non,bk,jnon",
	"j-non-readers,bk,jrean",
	"j-paperback,bk,jpbk",
	"j-parents,bk,jpare-jparf",
	"j-picture,bk,jpic",
	"j-playaway,bk,plj-plje-pljfi-pljn",
	"j-reader,bk,jread",
	"j-roundup,bk,jroun",
	"j-software,cd,jswcd",
	"j-teachers,bk,jtea",
	"j-toddler,bk,jtod",
	"j-view,view,pvj-pvjn",
	"ya-books,bk,ya-7ya-7yam",
	"ya-graphic,bk,ygram-ygran-ygrap",
	"ya-manga,bk,ymng-nymng",
	"ya-playaway,bk,ply-plyfi-plyn"	
);

foreach $location(@locations) {
	system("c:\\scripts\\selectors-items.pl $location");
};