$gvsv;
my $padsv;
$$gvsv;
# BEGIN { close STDERR }