diff --git a/tools/inventory.pl b/tools/inventory.pl index 8df02abba2..dd67e4d52f 100755 --- a/tools/inventory.pl +++ b/tools/inventory.pl @@ -154,10 +154,7 @@ if ( $uploadbarcodes && length($uploadbarcodes) > 0 ) { my $lines_read=0; binmode($uploadbarcodes, ":encoding(UTF-8)"); while (my $barcode=<$uploadbarcodes>) { - $barcode =~ s/\r/\n/g; - $barcode =~ s/\n\n/\n/g; - my @data = split(/\n/,$barcode); - push @uploadedbarcodes, @data; + push @uploadedbarcodes, grep { /\S/ } split( /[\n\r,;|-]/, $barcode ); } for my $barcode (@uploadedbarcodes) { next unless $barcode;