my @recomb_all = @{get_contents ($recomb_all)};

...

sub get_contents {
...
    return (\@contents);
}    # ----------  end of subroutine get_contents  ----------