php - 将 php.inc 文件导入 PERL 程序

Question

我正在尝试为 perl 和 php 使用 1 个包含文件

有没有什么好的方法可以在 perl 中导入 myphp.inc 文件？

$ cat myphp.inc
<?php
    $some_var="hello world";
?>

在我的 test.php 中使用上面的代码工作正常:

include "myphp.inc";

如果我删除 < ? php 然后 test.php 将只打印出 myphp.inc 文件的内容...如果我把它们留在里面然后我的 perl 程序会提示:

Unterminated <> operator

我看过 perl 模块:PHP::Include，但如果可能，我想远离外部模块。

有人对此有想法吗？？

Answer 1

不要尝试编写既是 PHP 又是 Perl 的代码，它们是不同的语言，即使它们有一些共同的祖先。如果要在两者之间共享数据，则使用结构化数据格式。 JSON是一种流行的味道。 PHP 有 parse_json Perl 有 JSON模块。

I would like to stay away from external modules if possible

代码重用是一种美德……尽管没有什么能阻止您从头开始重新实现模块。