+sub seek_and_read_ref_and_data {
+ my ($self, $index) = @_;
+ my $ref = $self->seek_and_read_ref($index);
+ my $bin = $self->seek_and_read_storage_bin($ref->{bin_index});
+ my $data = $self->get_entry_of_storage_bin($bin, $ref->{item_index});
+ $ref->{data} = $data;
+ $ref
+}
+