perl JSON module 사용 from_json으로 파싱된 데이터 사용

# $str_json에는 json형식의 string 데이터가 들어간다.
# orderingConfirmList의 key에 array의 형식으로 데이터가 들어있음[{"ORDER_NO":"11"},{"ORDER_NO":"2"}] 모 이쯤 되겠지.
# 그라지~~~

my $_scalar = from_json( $_str_json );
my @values = @{$_scalar->{'orderingConfirmList'}};

foreach my $_v ( @values )
{
        # print Dumper ( $_v );
        print $_v->{ORD_NO}. "\n";
}