diff --git a/src/ca/client/perl/Cap5.xs b/src/ca/client/perl/Cap5.xs
index 3cc25c68b..54ce8decb 100644
--- a/src/ca/client/perl/Cap5.xs
+++ b/src/ca/client/perl/Cap5.xs
@@ -1222,6 +1222,13 @@ PROTOTYPES: DISABLE
 
 BOOT:
     p5_ctx = Perl_get_context();
+    /* Ensure that the generated boot_Cap5 function is visible
+     * outside of the libCap5.so shared library when compiling
+     * with GCC4+ and -fvisibility=hidden is used.
+     */
+    #if __GNUC__ >= 4
+    #pragma GCC visibility push(default)
+    #endif
 
 
 SV *