- $row_data{toggle} = $toggle;
- $row_data{id} = $resultsbr[$i]->{'id'};
- $row_data{isbn} = $resultsbr[$i]->{'isbn'};
- $row_data{copyrightdate} = $resultsbr[$i]->{'copyrightdate'};
- $row_data{editionstatement} = $resultsbr[$i]->{'editionstatement'};
- $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 = [];
+my $id = 0;
+for my $resultsbr (@resultsbr) {
+ push @{$breeding_loop}, {
+ id => $id++,
+ isbn => $resultsbr->{isbn},
+ copyrightdate => $resultsbr->{copyrightdate},
+ editionstatement => $resultsbr->{editionstatement},
+ file => $resultsbr->{file},
+ title => $resultsbr->{title},
+ author => $resultsbr->{author},
+ };