common: replace newline output by say()

[sheet.git] / charset.plp

diff --git a/charset.plp b/charset.plp
index 3bf294e4489b4a54914bb03e97ab1e6fdac9b5f1..85b652bd89889c6c1586882571aea2ec3308cf16 100644 (file)
--- a/charset.plp
+++ b/charset.plp
@@ -182,7 +182,7 @@ for my $row (@request) {
                }
                print "\n";
        }
-       print "</table></div>\n";
+       say '</table></div>';
 }
 
 :>