+x it

lib/Troglodyne/API/Postgres.pm

@@ -167,7 +167,10 @@ sub _real_install {
             return _cleanup('255');
         }
         $pg_ctl_contents =~ s/unix_socket_directory/unix_socket_directories/g;
-        eval { File::Slurper::write_binary( "/usr/bin/pg_ctl", $pg_ctl_contents ); };
+        eval {
+            File::Slurper::write_binary( "/usr/bin/pg_ctl", $pg_ctl_contents );
+            chmod( 0644, '/usr/bin/pg_ctl' );
+        };
         if($@) {
             print $lh "[ERROR] Write to /usr/bin/pg_ctl failed: $@\n";
             return _cleanup('255');