#!/usr/bin/perl -w
use strict;
my %hash = ();
$hash{('A','B')} = ['C','D']; #这样没问题
#$hash{('A','B')} = ('C','D'); #这样是错的
#!/usr/bin/perl -w
use strict;
my %hash = ();
$hash{('A','B')} = ['C','D']; #这样没问题
#$hash{('A','B')} = ('C','D'); #这样是错的