do{split/: |;|\n/;$h{$_[0]}=[@_[1..$#_]]}for