当前位置: 首页 > 文档资料 > Perl 入门教程 >

unpack

优质
小牛编辑
134浏览
2023-12-01

描述 (Description)

此函数使用TEMPLATE中指定的格式解压缩二进制字符串STRING。 基本上颠倒pack的操作,根据提供的格式返回打包值列表。

您还可以使用%为任何格式字段添加前缀,以指示您需要STRING值的16位校验和,而不是值。

语法 (Syntax)

以下是此函数的简单语法 -

unpack TEMPLATE, STRING

返回值 (Return Value)

此函数返回解压缩值列表。

下面是表格,它给出了在TEMPLATE中使用的值。

Sr.No.字符和描述
1

a

用空字符填充的ASCII字符串

2

A

用空格填充的ASCII字符串

3

b

位串,最低位

4

B

位串,最高位

5

c

签名字符(范围通常为-128到127)

6

C

无符号字符(通常为8位)

7

d

双精度浮点数

8

f

单精度浮点数

9

h

十六进制字符串,最低位数

10

H

十六进制字符串,最高位数

11

i

有符号整数

12

I

无符号整数

13

l

带符号的长整数

14

L

无符号长整数

15

n

网络顺序中的短整数

16

N

网络顺序中的长整数

17

p

指向字符串的指针

18

s

带符号的短整数

19

S

无符号短整数

20

u

转换为uuencode格式

21

v

VAX(little-endian)顺序的短整数

22

V

VAX顺序的长整数

23

x

空字节

24

X

表示“返回一个字节”

25

@

填充空值(ASCII 0)

例子 (Example)

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl -w
$bits = pack("c", 65);
# prints A, which is ASCII 65.
print "bits are $bits\n";
$bits = pack( "x" );
# $bits is now a null chracter.
print "bits are $bits\n";
$bits = pack( "sai", 255, "T", 30 );
# creates a seven charcter string on most computers'
print "bits are $bits\n";
@array = unpack( "sai", "$bits" );
#Array now contains three elements: 255, A and 47.
print "Array $array[0]\n";
print "Array $array[1]\n";
print "Array $array[2]\n";

执行上述代码时,会产生以下结果 -

bits are A
bits are 
bits are ????T-
Array 255
Array T
Array 30