%prod=map{chomp;@a=split/\|/;shift@a,[@a]}<SRC>;