arrays - 每个元素的初始化列表都是一个关联数组，关联数组的最后一个元素是perl中的两个d数组？

Question

我正在尝试创建一个数据库。列表中的每个元素都包含关联数组形式的详细信息，每个关联数组的最后一个元素是一个二维数组，我需要帮助初始化它..

Answer 1

您需要详细说明您正在尝试做什么，但这可能会有所帮助：它以您描述的方式初始化 Perl 数据结构。请注意，哈希不能有“最后一个”元素（比“关联数组”更好的名称），因为哈希是无序的。我已经使用customers数据字段来保存您所说的二维数组。

use strict;
use warnings;

my @list = (
  {
    id => 1,
    name => 'cattle',
    customers => [
      [ 'World Bank', 'Space Marines', 'Undersea Exploration' ],
      [ 1, 2, 3 ],
      [ 0.0500, 0.6322, 0.9930 ],
    ],
  },
  {
    id => 2,
    name => 'arable',
    customers => [
      [ 'Jack Spratt', 'Molly Malone', 'The Whistler' ],
      [ 4, 5, 6 ],
      [ 0.0022, 0.1130, 0.6930 ],
    ],
  },
  {
    id => 3,
    name => 'seafood',
    customers => [
      [ 'Tai Chi School of Fishery', 'Latin Intermediary College', 'Ping Pong Gymnastics' ],
      [ 7, 8, 9 ],
      [ 0.0012, 0.8540, 0.9817 ],
    ],      
  },
);