http://www.perlmonks.org?node_id=574743


in reply to Parsing attributes in one line using map

split /=/
should be
split /=/, $_, 2

But what if any of the values contains ',' or '='?

my %attrs = $attr =~ /([^=,]+)=(.*?)(?:(?=,[^=,]+=)|$)/g;
We're building the house of the future together.