mysteriöses warning, warum?

[Christian Kruse]

你好 Struppi,

#!/usr/bin/perl -w

use strict;

my %hash = ();

if($hash{test}->{test}) {
  # nothing
}
print join(',',keys %hash),"\n";

Jupp -- in dem Fall wird implizit ein Eintrag erstellt, um auf ->{test}
zugreifen zu können.

再见,
克里斯蒂安