如何在perl中创建和使用字节数组？
[英]How do I create and use a byte array in perl?
问题描述
$var = pack "C2", 0x20, 0x30;
似乎工作得很好，但现在我如何解决数组的元素？ 对元素进行更改？ 如果可能的话。 pack / unpack语义不是很友好。
目前我正在使用substr($var, $index, 1, substr($var, $index, 1) + 10)来就地添加10个元素。
对于初始化器，如果我需要一个100字节的0x20数组，那么最好的方法是什么？ $var = "\\x20" x 100有效，它是'正确'的方式吗？
2 个解决方案
解决方案1
8 已采纳 2009-07-02 19:21:35
两个问题，两个答案：
Q.似乎运行得很好，但现在我如何解决数组的元素？
A. vec （）是你的朋友：
vec($var, $index, 8) += 10;
会做你想做的。
问：对于初始化器，如果我需要一个100字节的0x20数组，那么最好的方法是什么？ $ var =“\\ x20”x 100有效，它是'正确'的方式吗？
答：我的书中没问题。
解决方案2
2 2009-07-02 18:13:56
这适合您的需求吗？ 领带::阵列::包
如何使用映射函数从 Perl 中的数组创建自定义哈希？
[英]How do I do a use a map function to create a custom hash from an array in Perl?
如何在数组引用中使用索引作为Perl中的方法引用？
[英]How do I use an index in an array reference as a method reference in Perl?
声明:本站的技术帖子网页，遵循CC BY-SA 4.0协议，如果您需要转载，请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.