chomp($exp = <STDIN>);
 $out = 'exp';
 print $$out, "\n";