C:\test>type test.pl
#! perl -slw
use strict;
use Data::Dumper;

my %hash;

$hash{keya} = "";
$hash{keyb} = "";
$hash{keyc} = "";

$hash{keya}{1} = "fooA";
$hash{keya}{2} = "barA";
$hash{keyb}{1} = "fooB";
$hash{keyb}{2} = "barB";
$hash{keyc}{1} = "fooC";
$hash{keyc}{2} = "barC";

print Dumper (\%hash);

C:\test>test
Can't use string ("") as a HASH ref while "strict refs" in use at C:\test\test.pl line 11.