perl - 在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' );