my %hashofarrays=map{ my($key,$value)=split/[:]{2}=/; ($key=>[$value]) };