my %matches = %+;
sub(\%matches);

##</code><code>##

  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'
          }
        ];

##</code><code>##

  DB<22> sub func { my %matches = @_; say Dumper \%matches}

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