while (my ($key, $value) = each %datahash) {
    print {OUTFILE} "$key\t$value\n";
}
[download]

You may not think the output meets your requirements, but don't open it in a plain text editor. There are applications that will open a tab-separated text file and display it in two columns with text wrapping for long cells, just as you desire. You can adjust column widths as you desire while viewing the output, without having to go back and reprogram the output routine.

One such application (among many) is Microsoft Excel.