open my $OUTFILE, q{>}, $outfile
  or die "failed to open $outfile: $!";