foreach $resultline (@results) {
     print OUTPUT "$resultline\n";
}