$self->{files}->[$n]->{fh} = $fh;
  $self->{files}->[$n]->{name} = $file;