将Perl代码转换为PHP

Question

我需要将以下perl函数转换为php:

pack("SSA12AC4L",
     $id,
     $loc,
     $name,
     'ar',
     split(/\./, $get->getIP),
     time+(60*60);

我在PHP中使用以下代码(测试):

echo pack("SSA12AC4L",
     '25',
     '00001',
     '2u7wx6fd94fd',
     'f',
     preg_split('/\./','10.2.1.1', -1, PREG_SPLIT_NO_EMPTY),
     time()+(60*60));

但是我收到以下错误:警告:pack()[function.pack]:类型C:第8行的D:\ wamp\www\test.php中的参数太少

有什么建议？非常感谢.

Answer 1

来自pack()的PHP文档.

根据格式将参数打包成二进制字符串.

这个功能的想法取自Perl,所有格式代码的工作方式与Perl相同.但是,有一些格式代码丢失,例如Perl的"u"格式代码.

当然它应该按原样工作？您可能需要重命名一些变量