Read a file character by character/UTF8: Difference between revisions
Read a file character by character/UTF8 (view source)
Revision as of 09:11, 16 June 2024
, 13 days agoPascalABC.NET
m (→{{header|Wren}}: Changed to Wren S/H) |
(PascalABC.NET) |
||
Line 849:
end.
</syntaxhighlight>
=={{header|PascalABC.NET}}==
<syntaxhighlight lang="delphi">
begin
var f := OpenRead('a.txt',Encoding.UTF8);
while not f.Eof do
Print(f.ReadChar);
f.Close
end.
</syntaxhighlight>
=={{header|Perl}}==
<syntaxhighlight lang="perl">binmode STDOUT, ':utf8'; # so we can print wide chars without warning
| |||