my %BldEnv = (
  "TTT2" => {
    VersionOne => "one",
    VersionTwo => "two",
    VersionThree => "three",
    VersionFour => "four",
    }
);

# commented line works
#print "$BldEnv{TTT2}{VersionOne}\n";

# uncommented line doesn't work 
print "$BldEnv->{TTT2}->{VersionTwo}\n";