$name = 'foo';
$$name = 'bar';
print "foo = $foo\n";
__END__
foo = bar