Question

sub function{
my $storedata=shift;
my $storenameandaddress=$storedata->{$storeid}->{name}
."_".$storedata->{$storeid}->{location}->{address}
."_".$storedata->{$storeid}->{location}->{city}
."_".$storedata->{$storeid}->{location}->{state}
."_".$storedata->{$storeid}->{location}{country};}

我的代码如上所示。它给了我错误信息：

Using a hash as a reference is deprecated at main.pl line 141.

但是，该功能仍然可以运行。所有的休息似乎都很好。那么这个错误在谈论什么？我该如何解决？感谢。

Answer 1

您发布的代码未发出警告。表格代码

%foo->{bar}

发出警告。它发出警告，因为它起到

的作用

$foo->{bar}

即使它不应该。

$ perl -wE'my %h = ( foo => 123 ); say %h->{foo};'
Using a hash as a reference is deprecated at -e line 1.
123

$ perl -Mdiagnostics -wE'my %h = ( foo => 123 ); say %h->{foo};'
Using a hash as a reference is deprecated at -e line 1 (#1)
    (D deprecated) You tried to use a hash as a reference, as in
    %foo->{"bar"} or %$ref->{"hello"}.  Versions of perl <= 5.6.1
    used to allow this syntax, but shouldn't have. It is now deprecated, and will
    be removed in a future version.

123

$ perl -wE'my %h = ( foo => 123 ); say $h->{foo};'
123

perl中的错误：不推荐使用散列作为引用

1 个答案: