If hive returns errors, the values can be undef

burak · burak · commit 1d51971afa28 · 2014-02-05T19:51:27.000+01:00
diff --git a/lib/Thrift/API/HiveClient2.pm b/lib/Thrift/API/HiveClient2.pm
@@ -325,7 +325,12 @@ sub execute {
 
                 my $idx = 0;
                 push @$result,
-                    [ map { $row->{colVals}[ $idx++ ]{$_}->value() } @{ $column_keys->{$rv} } ];
+                    [
+                        map  { $_->value  }
+                        grep { defined $_ }
+                        map  { $row->{colVals}[ $idx++ ]{$_} }
+                        @{ $column_keys->{$rv} }
+                    ];
             }
         }
         return wantarray ? ( $result, $has_more_rows ) : ( @$result ? $result : undef );

Original file line number	Diff line number	Diff line change
`@@ -325,7 +325,12 @@ sub execute {`
`325`	`325`
`326`	`326`	`my $idx = 0;`
`327`	`327`	`push @$result,`
`328`		`- [ map { $row->{colVals}[ $idx++ ]{$_}->value() } @{ $column_keys->{$rv} } ];`
	`328`	`+ [`
	`329`	`+ map { $_->value }`
	`330`	`+ grep { defined $_ }`
	`331`	`+ map { $row->{colVals}[ $idx++ ]{$_} }`
	`332`	`+ @{ $column_keys->{$rv} }`
	`333`	`+ ];`
`329`	`334`	`}`
`330`	`335`	`}`
`331`	`336`	`return wantarray ? ( $result, $has_more_rows ) : ( @$result ? $result : undef );`