$ast = "best";
$fred = "date";
$"$ast" = 1;
print "$best";