Select Code to Download

## Being lazy and using the Mojo "ojo" oneliner for it's dumper r()
$ perl -Mojo -MEnglish -E '$_ = q{foo = bar};m{(?<name>\w+) \s* = \s* 
+(?<value>.*) $}x; say r(\%{^CAPTURE})'
...
  "name" => "foo",
  "value" => "bar"
}

$ perl -Mojo -MTie::Hash::NamedCapture -E '$_ = q{foo = bar};m{(?<name
+>\w+) \s* = \s* (?<value>.*) $}x; tie my %h, q{Tie::Hash::NamedCaptur
+e}; say r(\%h)'
{
  "name" => "foo",
  "value" => "bar"
}