在perl中使用'pack'函数发送数组的问题

Question

我正在使用pack函数将列表的内容发送到套接字。代码如下。

$message_array = pack ("(A*)*", @ul_dcch_message);

列表内容为

@ul_dcch_message = (101101012411011, "emergency", 25, "simple");

这段代码发送列表中包含的所有字符串和数字。但如果列表中的数字超过15位，我会得到一些这样的东西，

 1.01101012411011e+16emergency25simple

我的要求是，我想“打包”数字和字符串，数字将超过15位或更多。

有什么办法吗？是否有其他模板可以做到这一点??。

感谢任何帮助。

Answer 1

引用该数字，以便pack可以将其解释为字符串而不是以指数表示法表示的数字。

@ul_dcch_message = ( '101101012411011', 'emergency', '25', 'simple' );