authnotrequired => 0,
flagsrequired => {acquisition => 'order_receive'},
});
-my @ordernumbers = $input->param('ordernumber');
+my @ordernumbers = $input->multi_param('ordernumber');
my @orders;
for my $ordernumber ( @ordernumbers ) {
-attachment => 'lateorders.csv',
);
$template->param( orders => \@orders );
-print $template->output;
+for my $line ( split '\n', $template->output ) {
+ print "$line\n" unless $line =~ m|^\s*$|;
+}