in reply to Re: Perl UTF-8 serving HTML5
in thread Perl UTF-8 serving HTML5

The binmode STDOUT, ':raw' is because you have already encoded your data. If you put STDOUT in UTF-8 mode, it will end up double-encoded.

If you are on a Windows system, the byte count discrepancy might be because Perl represents line breaks internally as line feed characters. When it does output it converts the line breaks to native format. If run on Windows, this adds one character per line. Putting the handle into ':raw' mode prevents this.

Replies are listed 'Best First'.
Re^3: Perl UTF-8 serving HTML5
by $h4X4_|=73}{ (Monk) on May 29, 2016 at 21:04 UTC

    If you are on a Windows system, the byte count discrepancy might be because Perl represents line breaks internally as line feed characters.

    That was it. I just count the line breaks on windows and added it to the overall count and it works.
    Thanks.

[reply]
      Or you could turn it off the :crlf layer  binmode STDOUT, ':raw:encoding(UTF-8)';
[reply]
[d/l]

        The binmode STDOUT, ':raw:encoding(UTF-8)'; is kinda close, but the count is off by 1. Adding 1 and it works. I am using Perl 5.22.1 if that helps.

        Update: Now that I reviewed the numbers from counting line breaks and binmode STDOUT, ':raw:encoding(UTF-8)';. Counting line breaks will give you a much lager number, that is why it works. Where using binmode STDOUT, ':raw:encoding(UTF-8)'; and adding one to it. Then its just right.

        What kind of portability issues will I face when using something like this on Linux?

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom