Lines 361-366
if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){
Link Here
|
361 |
push @line, "change item status"; |
361 |
push @line, "change item status"; |
362 |
} elsif ($item->{problem} eq 'not_scanned' ) { |
362 |
} elsif ($item->{problem} eq 'not_scanned' ) { |
363 |
push @line, "item not scanned"; |
363 |
push @line, "item not scanned"; |
|
|
364 |
} elsif ($item->{problem} eq 'out_of_order' ) { |
365 |
push @line, "possibly out of order"; |
364 |
} |
366 |
} |
365 |
} |
367 |
} |
366 |
$csv->combine(@line); |
368 |
$csv->combine(@line); |
367 |
- |
|
|