my %attrs = $attr =~ /([^=,]+)=(.*?)(?:(?=,[^=,]+=)|$)/g;