use strict;
use warnings;
use Data::Dump qw/pp dd/;

use feature qw/refaliasing/;
no warnings "experimental::refaliasing";


sub tst {
    (\my %args) = @_;
    pp \%args;
}

tst({a=>1,b=>2});