$c = 'foo'; $want = 'c'; print $$want, $/;