my $alpha = "A";
my $delta = "D";
my $test = "$delta and $alpha";
eval "\$test = \"$test\"";
print "$test";