C:\>type foo.pl
my @foo;

$foo[0]{abc} = 3.14;

print $foo[0]{abc};

C:\>perl foo.pl
3.14
C:\>