Select Code to Download

$self->{_get_next_rec} = $opts{code}
    if ref $opts{code} eq 'CODE';
...
        my $rec = $self->{_get_next_rec}->( $self->{fh} );
        return $rec;
      };