for (foo()) { # ... } sub foo { return @{ $aref }; }