From bad203691742aecb781702ad1de4fc6e33fec356 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=EA=A6=8C=EA=A6=AB=EA=A6=B6=EA=A6=8F=EA=A7=80=EA=A6=A6?= =?UTF-8?q?=EA=A6=BF=EA=A6=A7=EA=A6=AE=EA=A6=91=EA=A6=A9=EA=A6=AD=EA=A7=80?= Date: Sat, 17 Jul 2021 13:22:04 +0800 Subject: Sometimes there's no array layer from query --- config/pikul_order.tag | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/config/pikul_order.tag b/config/pikul_order.tag index de4f7f2..0aad5c8 100644 --- a/config/pikul_order.tag +++ b/config/pikul_order.tag @@ -24,7 +24,7 @@ sub { my @items = @{$Tag->query({sql => "SELECT sku,quantity FROM orderline WHERE \ order_number='$order_number'", wantarray => 1 - })->[0]}; + })}; for my $item (@items) { ($item->[2], $item->[3], $item->[4]) = @{$Tag->query({ sql => "SELECT description,price,weight FROM products WHERE sku='$item->[0]'", -- cgit v1.2.3