php - 从 PHP 获取数据并在 perl 中处理

Question

我开发了一个标记器来标记特定域的术语。出于标记目的，我使用了 Perl。标记器标签从文献中抽象出来，我开发了一个实际收集用户输入的界面。我的问题是如何从界面获取数据并将其作为数组传递给 Perl 脚本，以及如何在 Perl 脚本处理后显示输出。

我有必要的标记脚本就是无法解决上述问题。

我几乎没有得到使用 JSON 的建议。所以我想有两个不同的脚本，一个是 php，另一个是我拥有的 perl。以及自动显示处理后的文件怎么样

Answer 1

您可能需要使用数据编码协议(protocol)。两种简单的可能性(对于 PHP 和 Perl)是:

• JSON 输出 -> JSON 输入。
• YAML 输出 -> YAML 输入。

JSON

在 PHP 中:

$myFile = "testFile.txt";
$fh = fopen($myFile, 'w') or die("can't open file");
fwrite($fh, json_encode( $struct ));
fclose($fh);

在 Perl 中:

use File::Slurp qw<read_file>;
use JSON qw<from_json>;

my $struct = from_json( read_file( 'testfile.txt' ));

YAML (JSON 的超集)

在 PHP 中:

yaml_emit_file( "testfile.txt", $struct );

在 Perl 中:

use File::Slurp qw<read_file>;
use YAML::XS qw<Load>;

my $struct = Load( read_file( 'testfile.txt' ));

此外，还有很好的老式 XML，但要使它几乎一样简单，您必须在 PHP 中使用 Pear。但是XML::Simple 可以让它变得简单。