在perl中动态添加数据

时间:2011-11-16 00:18:53

标签: perl

任何人都可以解释在动态添加信息和在PERL中静态添加信息之间的区别。我很困惑。请?我见过动态上传数据的代码是:

$database{"MRD-300"} = {
    "Name"    => "Nathan Hale",
    "Address" => "999 Centennial Ave.",
    "Town"    => "AnyTown",
    "State"   => "AnyState",
    "Zip"     => "12345-1234"
};

$refCustomer = $database{"MRD-300"};

print(%{$refCustomer}->{"Name"} . "\n");
print(%{$refCustomer}->{"Address"} . "\n");

1 个答案:

答案 0 :(得分:0)

我认为这算是“静态添加信息”:

my %database;
%database = (
    "MRD-300" => { Name => ..., Address => ..., Town => ... },
    "HKQ-509" => { Name => ..., Address => ..., Town => ... },
    "BXL-994" => { Name => ..., Address => ..., Town => ... },
);

使用单独的赋值语句可以完成同样的事情:

my %database;
$database{"MRD-300"} = { Name => ..., Address => ..., Town => ... };
$database{"HKQ-509"} = { Name => ..., Address => ..., Town => ... };
$database{"BXL-994"} = { Name => ..., Address => ..., Town => ... };