Read a file character by character/UTF8: Difference between revisions
Content deleted Content added
→{{header|zkl}}: rewrite |
No edit summary |
||
| Line 454: | Line 454: | ||
print $_ while defined $_ = $in.getc;</lang> |
print $_ while defined $_ = $in.getc;</lang> |
||
=={{header|PicoLisp}== |
|||
<lang PicoLisp> |
|||
(in "wordlist" (char)) |
|||
</lang> |
|||
{{out}} |
|||
"A" |
|||
=={{header|Python}}== |
=={{header|Python}}== |
||
{{works with|Python|2.7}} |
{{works with|Python|2.7}} |
||