diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm index 4346423a0d..bb2f39e508 100644 --- a/src/test/perl/PostgresNode.pm +++ b/src/test/perl/PostgresNode.pm @@ -1533,7 +1533,7 @@ sub query_hash # my %val; @val{@columns} = - $result ne '' ? split(qr/\|/, $result) : ('',) x scalar(@columns); + $result ne '' ? split(qr/\|/, $result, -1) : ('',) x scalar(@columns); return \%val; }