@@ -, +, @@ FAIL acqui/basket.pl OK critic OK forbidden patterns OK pod FAIL valid "my" variable @results masks earlier declaration in same scope --- acqui/basket.pl | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) --- a/acqui/basket.pl +++ a/acqui/basket.pl @@ -365,7 +365,7 @@ if ( $op eq 'delete_confirm' ) { push @book_foot_loop, map {$_} values %foot; # Get cancelled orders - my @results = GetOrders($basketno, { cancelled => 1 }); + @results = GetOrders($basketno, { cancelled => 1 }); my @cancelledorders_loop; for my $order (@results) { my $line = get_order_infos( $order, $bookseller); --