open my $OUTPUT, '>', $outputfile or die "File open fail: $!\n";