diff options
| -rw-r--r-- | src/test/perl/PostgresNode.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm index f7088667a4a..c09a735dae9 100644 --- a/src/test/perl/PostgresNode.pm +++ b/src/test/perl/PostgresNode.pm @@ -1248,10 +1248,8 @@ sub _set_pg_version local %ENV = $self->_get_env(); # We only want the version field - open my $fh, "-|", $pg_config, "--version" - or BAIL_OUT("$pg_config failed: $!"); - my $version_line = <$fh>; - close $fh or die; + my $version_line = qx{$pg_config --version}; + BAIL_OUT("$pg_config failed: $!") if $?; $self->{_pg_version} = PostgresVersion->new($version_line); |