From 301b6651f83a17e0287d6f1aae4def7b64faaa93 Mon Sep 17 00:00:00 2001
From: Mark Wong <mark@2ndQuadrant.com>
Date: Wed, 25 Jul 2018 16:56:27 +0000
Subject: [PATCH] Update example script to use perl Data::Dumper

---
 contrib/ps-util.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/contrib/ps-util.pl b/contrib/ps-util.pl
index c78ce97..3038e85 100755
--- a/contrib/ps-util.pl
+++ b/contrib/ps-util.pl
@@ -6,7 +6,7 @@ use warnings;
 use Number::Bytes::Human qw(format_bytes);
 use Getopt::Long;
 
-use Data::Dumper::Simple;
+use Data::Dumper;
 $Data::Dumper::Indent	= 1;
 
 my ($db, $list, $pid, $snap_1, $snap_2);
-- 
2.39.5