# The following line is the re-existing code in another 
# part of the program beyond my control:
# $alpha_state = "STATE";
# Next follows my own code:
use strict;
my %hash;
$hash{alpha}{state} = ${"$alpha" . "_state"};