$f = "foo";     # (1)

# ...
# time passes...  (2)
# ...

print {$f} bar; # (3)