DB<18> use Data::Dumper

  DB<19> sub func { say Dumper \@_}

  DB<20> 'ABC' =~ /(?<a>\w)(?<b>\w)(?<c>\w)/; func({%+})
$VAR1 = [
          {
            'a' => 'A',
            'b' => 'B',
            'c' => 'C'
          }
        ];