如何在ARM架构macOS上安装支持x86_64/arm64的通用Perl模块？

核心结论 #

可以安装和更新支持x86_64、arm64双架构的Perl（CPAN）模块，核心思路是分别编译两个架构的模块二进制文件，再用Apple的lipo工具合并为通用二进制，同时可通过脚本实现自动化，满足通用性、安装/更新支持和无冲突的需求。

具体操作步骤 #

1. 准备临时目录，分别编译两个架构的模块

为避免直接覆盖系统模块引发冲突，先将两个架构的模块安装到独立临时目录：

# 创建临时目录
mkdir -p ~/perl_temp/arm64 ~/perl_temp/x86_64

# 安装arm64架构模块到临时目录
arch -arm64 cpan -L ~/perl_temp/arm64 Module::Name

# 安装x86_64架构模块到临时目录（需已安装Rosetta 2）
arch -x86_64 cpan -L ~/perl_temp/x86_64 Module::Name

注：将Module::Name替换为实际要安装的模块名（比如Encode）；-L参数指定本地安装路径，不会修改系统Perl目录。

2. 用lipo合并通用二进制文件

找到两个临时目录中模块的.bundle或.so二进制文件，执行合并：

# 示例：合并Encode模块的二进制文件
# 定位arm64版本路径
ARM_BUNDLE=$(find ~/perl_temp/arm64 -name "Encode.bundle")
# 定位x86_64版本路径
X86_BUNDLE=$(find ~/perl_temp/x86_64 -name "Encode.bundle")

# 合并为通用二进制
lipo -create -output ~/Encode_universal.bundle $ARM_BUNDLE $X86_BUNDLE

# 验证合并结果
file ~/Encode_universal.bundle

输出应显示包含x86_64和arm64两种架构。

3. 部署通用模块到系统或本地库

• 方案一：替换系统模块（需谨慎）
  先备份原系统模块，再替换为合并后的通用版本：

  # 备份原模块
  sudo cp /Library/Perl/5.30/darwin-thread-multi-2level/auto/Encode/Encode.bundle /Library/Perl/5.30/darwin-thread-multi-2level/auto/Encode/Encode.bundle.backup
  # 替换为通用版本
  sudo cp ~/Encode_universal.bundle /Library/Perl/5.30/darwin-thread-multi-2level/auto/Encode/Encode.bundle
  

• 方案二：使用local::lib（更安全，不修改系统文件）
  将合并后的模块部署到用户本地Perl库，通过环境变量让应用加载：

  # 创建本地库目录
  mkdir -p ~/perl_lib/auto/Encode
  # 复制通用二进制到本地库
  cp ~/Encode_universal.bundle ~/perl_lib/auto/Encode/
  # 设置环境变量（可添加到~/.zshrc或~/.bashrc永久生效）
  export PERL5LIB=~/perl_lib:$PERL5LIB
  

4. 自动化脚本（通用安装/更新）

编写Shell脚本install_universal_perl_module.sh，实现一键安装/更新通用架构模块：

#!/bin/bash
MODULE=$1

if [ -z "$MODULE" ]; then
    echo "用法: $0 <模块名>"
    exit 1
fi

# 创建临时目录
TEMP_DIR=~/perl_temp_$MODULE
mkdir -p $TEMP_DIR/arm64 $TEMP_DIR/x86_64

# 编译两个架构的模块
echo "编译arm64架构模块..."
arch -arm64 cpan -L $TEMP_DIR/arm64 $MODULE
echo "编译x86_64架构模块..."
arch -x86_64 cpan -L $TEMP_DIR/x86_64 $MODULE

# 查找二进制文件
BUNDLE_NAME=$(basename $(find $TEMP_DIR/arm64 -name "*.bundle" -o -name "*.so" | head -1))
ARM_PATH=$(find $TEMP_DIR/arm64 -name "$BUNDLE_NAME")
X86_PATH=$(find $TEMP_DIR/x86_64 -name "$BUNDLE_NAME")

if [ -z "$ARM_PATH" ] || [ -z "$X86_PATH" ]; then
    echo "未找到模块的二进制文件"
    exit 1
fi

# 合并通用二进制
lipo -create -output $TEMP_DIR/$BUNDLE_NAME $ARM_PATH $X86_PATH

# 部署到系统目录（可根据需求修改为local::lib路径）
INSTALL_PATH=$(perl -M$MODULE -e 'print $INC{"'"$MODULE"'"}' | sed "s/\.pm$/\/auto\/$MODULE\/$BUNDLE_NAME/")
sudo cp $TEMP_DIR/$BUNDLE_NAME $INSTALL_PATH

# 清理临时目录
rm -rf $TEMP_DIR

echo "通用架构模块 $MODULE 安装完成！"

使用方法：

chmod +x install_universal_perl_module.sh
sudo ./install_universal_perl_module.sh Encode

关键补充说明 #

关于cc -bundle选项

macOS上的cc是clang的软链接，-bundle是clang的官方选项，用于构建Mach-O格式的bundle文件（即Perl XS模块的动态链接库），可通过man clang查看详细说明。

避免系统模块覆盖冲突

Apple自带的Perl模块（如Encode）本身是通用二进制，手动安装单一架构模块会覆盖它，导致跨架构应用报错。因此建议优先使用local::lib方案，或在替换系统模块前做好备份。

关于多架构arch命令测试

sudo arch -x86_64 -arm64 -arm64e cpan -i Encode不可行，因为arch命令一次只能指定一个目标架构，无法同时编译双架构模块。

内容的提问来源于stack exchange，提问作者marc-medley