Select Code to Download

sub build_list {
   my ($arg1, arg2, ...) = @_;
...
      return ();
   }
}

sub build_list {
    ...
...

    return @list;  # list could still be empty at this point
}