Select Code to Download

my $count;
my %params = map { ++$count % 2 ? lc : $_ } $raw =~ /(\S+)\s*=\s*(\S+)
+/g;

my %params = map { ++$. % 2 ? lc : $_ } $raw =~ /(\S+)\s*=\s*(\S+)/g;

.