Item1518: Use << for multi-line print

git-svn-id: http://svn.foswiki.org/trunk@11612 0b4bb1d4-4e5a-0410-9cc4-b2b747904278

core/lib/Foswiki/Users/HtPasswdUser.pm

@@ -238,15 +238,13 @@ sub _savePasswd {
           or throw Error::Simple(
             $Foswiki::cfg{Htpasswd}{FileName} . '.README open failed: ' . $! );
 
-        print $readme
-"# Foswiki uses a specially crafted .htpasswd file format that should not be\n";
-        print $readme
-"# manipulated using a standard htpasswd utility or loss of registered emails might occur..\n";
-        print $readme
-"# (3rd-party utilities do not support the email address format used by Foswiki).\n";
-        print $readme "# \n";
-        print $readme
-"# More information available at: http://foswiki.org/System/UserAuthentication.\n";
+        print $readme <<'EoT';
+Foswiki uses a specially crafted .htpasswd file format that should not be
+manipulated using a standard htpasswd utility or loss of registered emails might occur.
+(3rd-party utilities do not support the email address format used by Foswiki).
+
+More information available at: http://foswiki.org/System/UserAuthentication.
+EoT
         close($readme);
     }