View | Details | Raw Unified | Return to bug 4162
Collapse All | Expand All

(-)a/tools/inventory.pl (-2 / +1 lines)
Lines 170-178 if ( $uploadbarcodes && length($uploadbarcodes) > 0 ) { Link Here
170
    my $lines_read=0;
170
    my $lines_read=0;
171
    binmode($uploadbarcodes, ":encoding(UTF-8)");
171
    binmode($uploadbarcodes, ":encoding(UTF-8)");
172
    while (my $barcode=<$uploadbarcodes>){
172
    while (my $barcode=<$uploadbarcodes>){
173
        ++$lines_read;
174
        $barcode =~ s/\r?\n$//;
173
        $barcode =~ s/\r?\n$//;
175
        next unless $barcode;
174
        next unless $barcode;
175
        ++$lines_read;
176
        if (length($barcode)>$barcode_size) {
176
        if (length($barcode)>$barcode_size) {
177
            $err_length += 1;
177
            $err_length += 1;
178
        }
178
        }
179
- 

Return to bug 4162