sub large_array_ref { my $large_array_ref = shift; ...populate @$large_array_ref... return; } large_array_ref( \my @c ); $c[ ... ];