将perl关联数组转换为PHP数组

Question

我是否可以使用php库将perl中的关联数组转换为php中的关联数组？如果没有，有没有推荐的方法这样做？常用表达 ？一堆爆炸和内爆的电话？

我想从

开始

my %arrayname = (
    key1 => "Value1",
    key2 => "Value2",
    key3 => "Value3",
...

到

$arrayname = array(
        "key1" => "Value1",
        "key2" => "Value2",
        "key3" => "Value3",

Answer 1

如果您的服务器上有Perl，则使用：

print 'Array(';
while (($key, $val) = each(%arrayname)) {
    print "'$key' => '$val',";
}
print ');';

您还可以查看PECL Perl package，此库在PHP中集成了一个Perl解析器。

您可以将an online Perl interpreter与示例代码一起使用（最后只有一个额外的逗号）。

我创建了一个几乎有效的正则表达式。你可以尝试一下，但这取决于Perl数组的结构：

preg_match_all(#\%(.+)\s=|\n(.+).*#);

示例数据：

my %arrayname = (
    key1 => "Value1",
    key2 => "Value2",
    key3 => "Value3"
)

您可以使用Regular Expression Test Tool进行测试。