NativeCall如何加载未直接调用的依赖库符号？

你的问题本质是动态链接器未自动加载testlib2库——因为你的Perl 6程序（testit.p6）没有直接引用testlib2的符号，只有testlib1的例程间接调用它们，导致运行时符号解析失败。下面是几种无需手动调用sub2的解决方案：

1. 显式加载依赖库（Perl 6 NativeCall 实现） #

在Perl 6程序启动时，用NativeCall显式加载testlib2库，不需要调用任何函数，只要完成加载操作，库中的符号就会被注册到全局符号表中，供testlib1调用。

示例代码：

use NativeCall;

# 显式加载testlib2库（Linux/macOS），无需调用任何函数
my $lib2 = dlopen("libtestlib2.so", RTLD_GLOBAL);
# Windows环境替换为：my $lib2 = LoadLibrary("testlib2.dll");

# 正常调用testlib1的sub1
sub sub1() is native("libtestlib1.so") { * }
sub1();

# 程序结束时可选择关闭库（可选操作）
dlclose($lib2) if $lib2;

RTLD_GLOBAL 选项是关键，它会让加载的库符号对其他已加载的库可见，确保testlib1能找到testlib2的符号。

2. 修改链接命令，强制关联testlib2 #

如果是编译或链接环节的问题，可以强制把testlib2加入依赖链，让动态链接器在程序启动时自动加载它：

• 编译testlib1时直接链接testlib2：

gcc -shared -o libtestlib1.so testlib1.c -ltestlib2

• 运行Perl 6程序时通过环境变量预加载库：

# Linux/macOS
LD_PRELOAD=./libtestlib2.so perl6 testit.p6

# Windows
set PATH=%PATH%;.
set LOAD_LIBRARY=testlib2.dll
perl6 testit.p6

3. 用链接器选项强制保留依赖库 #

如果链接时因为"未直接引用"被优化掉了testlib2，可以用链接器选项强制保留它：

gcc -shared -o libtestlib1.so testlib1.c -Wl,--no-as-needed -ltestlib2 -Wl,--as-needed

--no-as-needed 会告诉链接器不要忽略无直接引用的库，之后用--as-needed恢复默认行为，避免引入不必要的依赖。

为什么手动调用sub2就正常？ #

当你手动调用sub2时，Perl 6的NativeCall会自动加载testlib2库，此时库中的符号已被加载到全局符号表，testlib1调用sub2时就能找到对应的符号，所以程序正常运行。上面的方法都是模拟这个"预加载库"的过程，但不需要你手动调用无用的函数。

内容的提问来源于stack exchange，提问作者Curt Tilmes