将php.inc文件导入PERL程序

Dou*_*las 1 php linux perl

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

有没有一种很好的方法在perl中导入myphp.inc文件?

$ cat myphp.inc
<?php
    $some_var="hello world";
?>
Run Code Online (Sandbox Code Playgroud)

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

include "myphp.inc";
Run Code Online (Sandbox Code Playgroud)

如果我删除<?php然后test.php将打印出myphp.inc文件的内容...如果我将它们留在那里我的perl程序抱怨:

Unterminated <> operator
Run Code Online (Sandbox Code Playgroud)

我见过perl模块:PHP :: Include但我想尽可能远离外部模块.

有人有这个想法?

Que*_*tin 9

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

如果可能的话,我想远离外部模块

代码重用是一种优点......虽然没有什么可以阻止您从头开始重新实现模块.

  • @Douglas,将$ MAX_ROWS和朋友视为运行时配置参数.将它们存储为对您的程序和平台有意义的格式 - 配置文件(JSON?),注册表,设置环境变量的包装脚本,Web服务等等. (4认同)
  • 即使是只有`key:value`或`key = value`行的`.ini`文件也比这更有意义.它不一定是JSON,它只是方便,因为它很容易解析.用户也可以更容易地编辑这些配置参数. (2认同)