sub build_list {
    ...
    my @list = ();

    if ( something ) {
       push @list, $whatever, ...;
    }

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