Load FileHandle to fix error: Can not locate object method "seek" via package "IO...

diff --git a/pgbadger b/pgbadger
index 79bbdfd937c29a06859810fca88e55e4068b47b5..3656e75794ebea0566018647d3dfe7e443c8936d 100755 (executable)
--- a/pgbadger
+++ b/pgbadger
@@ -42,6 +42,7 @@ use File::Spec qw/ tmpdir /;
 use File::Temp qw/ tempfile /;
 use IO::Handle;
 use IO::Pipe;
+use FileHandle;
 
 $VERSION = '5.0';