$STDERR  = \*STDERR ;
  my $DATA = \*DATA ;