my $subref = \&getarray;