package Dont_touch;
sub new { my $x; \$x; }
1;