$x = 'main::';
   $y = 'x';
   print *{${$x;}{$y};}{'SCALAR'};
   -e syntax OK