local *ON::Ar = $myvar->{ar};
$blessed->function;

##</code><code>##

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