use Data::Alias qw( alias );
alias @ON::Ar = @{$myvar->{ar}};
$blessed->function;