diff --git a/request.pl b/request.pl
index 4a9bfaa8e7..0985c73252 100755
--- a/request.pl
+++ b/request.pl
@@ -120,7 +120,11 @@ printend
 my @data;
 ($count2,@data)=bibitems($bib);
 for (my $i=0;$i<$count2;$i++){
-  my @barcodes=barcodes($data[$i]->{'biblioitemnumber'});
+  my @barcodehashes=barcodes($data[$i]->{'biblioitemnumber'});
+  my @barcodes;
+  foreach (@barcodehashes) {
+      push @barcodes, $_->{barcode};
+  }
   if ($data[$i]->{'dewey'} == 0){
     $data[$i]->{'dewey'}="";
   }