如何将Perl数组转换为PHP数组?

如何将Perl数组转换为PHP数组?,php,perl,Php,Perl,请帮助我将此Perl数组转换为PHP数组: { 'method' => 'sip_endpoint.save', 'parameters' => { 'transport' => [ 'UDP' <-------especially this one ], 'object_type' => 'sip_endpoint', 'nat' =>

请帮助我将此Perl数组转换为PHP数组:

{
'method' => 'sip_endpoint.save',
'parameters' => {
     'transport' => [
                     'UDP'     <-------especially this one
                    ],
      'object_type' => 'sip_endpoint',
      'nat' => 'yes'
   }
}
{
'方法'=>'sip_endpoint.save',
“参数”=>{
“传输”=>[
“UDP”“sip_终结点”,
“nat”=>“是”
}
}

带有简单替换..可以将其转换为有效的
json

$json = "{
'method' => 'sip_endpoint.save',
'parameters' => {
     'transport' => [
                     'UDP' 
                    ],
      'object_type' => 'sip_endpoint',
      'nat' => 'yes'
   }
}";

$json = str_replace(array("'","=>"), array('"',":"), $json);
$array = json_decode($json,true);
print($array['parameters']['transport'][0]);  //what you want
输出

UDP

如果您需要Perl与PHP对话,最好的方法是使用他们都理解的东西,比如JSON或YAML。可能
array('method'=>'sip_endpoint.save','paramaters'=>array('transport'=>array('UDP'),'object_type'=>'sip_endpoint','nat=>'yes'))实际上,我正在php上实现一个API,但是用户手册是用perl编写的,所以我需要转换它。我对**“transport”=>['UDP']**表示怀疑。你能给我们看一下API,或者关于该手册的更多信息吗?
{}
中的所有内容都是perl哈希。你可以在php中将它们命名为array。
['UDP']
是一个简单的数组。
UDP
是索引0。@HamZa的建议听起来不错。