- $row_data{toggle} = $toggle;
- $row_data{id} = $resultsbr[$i]->{'id'};
- $row_data{isbn} = $resultsbr[$i]->{'isbn'};
- $row_data{file} = $resultsbr[$i]->{'file'};
- $row_data{title} = $resultsbr[$i]->{'title'};
- $row_data{author} = $resultsbr[$i]->{'author'};
- push( @breeding_loop, \%row_data );
+ ( $countbr, @resultsbr ) = BreedingSearch( $title, $isbn );
+}
+my $breeding_loop = [];
+for my $resultsbr (@resultsbr) {
+ push @{$breeding_loop}, {
+ id => $resultsbr->{import_record_id},
+ isbn => $resultsbr->{isbn},
+ copyrightdate => $resultsbr->{copyrightdate},
+ editionstatement => $resultsbr->{editionstatement},
+ file => $resultsbr->{file_name},
+ title => $resultsbr->{title},
+ author => $resultsbr->{author},
+ };