my $extract = $whatever{'a'}[0]; #should = 1