open( OUT, '>', "$output_file" ) or croak "Unable to open $output_file, $!";
print OUT "$number[2], $number[$i], $number[$i+1]\n";