sub foo { return (0,1); }
my $aref = [foo()];