sub{my$x=\$x}; #### sub { my $x; $x = \$x; }