open my $OUT, '>>', $filename
  or die "Can't create '$filename': $!";