common: replace newline output by say()

[sheet.git] / countries.plp

diff --git a/countries.plp b/countries.plp
index 734a13397728c089efd94b33612b727366340ba0..60a392db5eb2f33989f34b31224c80bf459a8936 100644 (file)
--- a/countries.plp
+++ b/countries.plp
@@ -57,7 +57,7 @@ my $cc = do 'countries.inc.pl';
                }
                print "\n";
        }
-       print "</table>\n";
+       say '</table>';
 }
 
 :>