如何在c程序中嵌入perl脚本？

#include "EXTERN.h"
#include "perl.h"

int main(int argc, char **argv) {
    // 初始化Perl解释器
    PERL_SYS_INIT3(&argc, &argv, NULL);

    // 创建一个Perl解释器实例
    PerlInterpreter *my_perl = perl_alloc();
    perl_construct(my_perl);

    // 在C程序中嵌入Perl脚本
    char *perl_code = "print 'Hello, Perl!';";
    eval_pv(perl_code, TRUE);

    // 清理Perl解释器实例
    perl_destruct(my_perl);
    perl_free(my_perl);

    // 释放Perl解释器相关资源
    PERL_SYS_TERM();

    return 0;
}

gcc -o my_program main.c -I/usr/include/perl -L/usr/lib/perl -lperl

./my_program