42、Perl 嵌套数据结构与引用的使用

Perl 嵌套数据结构与引用的使用

1. 嵌套数据结构概述

在编程中，我们常常需要处理复杂的数据，嵌套数据结构就显得尤为重要。常见的嵌套数据结构有数组的数组、哈希的数组以及哈希的哈希。例如：

%people = (
    'Smith' => {
        'name' => 'Tom',
        'age' => 18,
        'pet' => 'fish',
    },
);

要从内部哈希中检索数据，可以使用以下代码：

print $people{'Smith'}->{'pet'}, "\n";

我们可以根据数据的特点和组织需求，以任意方式组合数组、哈希、引用和匿名数据。嵌套的深度没有限制，可按需创建复杂的数据结构。

2. 利用现有数据构建嵌套数据结构

当我们提前知道数据内容时，使用匿名数据创建嵌套数据结构很方便。但在实际应用中，数据通常从文件读取或通过键盘输入。

假设我们有一个包含数字矩阵的文件，内容如下：

3 4 2 4 2 3
5 3 2 4 5 4
7 6 3 2 8 3
3 4 7 8 3 4

我们想将其读取到一个数组的数组中，每行作为一个独立的数组，用一个大数组存储这些行。可以使用以下循环实现：