%hash = map{split /=/, $_, 2} split/&/, $dbresult;