use strict;
use warnings;
use Data::Dumper;
my %h;
my $undef = undef;
$h{''}='test2';
$h{$undef} = 'test';
print Dumper (\%h);
创建以下输出:
$VAR1 = {
'' => 'test'
};
为什么会这样?我有 Perl 5.12.3。
谢谢你的时间。
use strict;
use warnings;
use Data::Dumper;
my %h;
my $undef = undef;
$h{''}='test2';
$h{$undef} = 'test';
print Dumper (\%h);
创建以下输出:
$VAR1 = {
'' => 'test'
};
为什么会这样?我有 Perl 5.12.3。
谢谢你的时间。