io的意外行为:在Erlang中的fread

-module(io_fread_example).
-export([read_file/1]).

read_file(FileName) ->
    case file:open(FileName, [read]) of
        {ok, File} ->
            read_data(File);
        {error, Reason} ->
            io:format("Error opening file: ~p~n", [Reason])
    end.

read_data(File) ->
    case io:fread(File, "", "~d~s") of
        {ok, [Number, String]} ->
            io:format("Number: ~p, String: ~p~n", [Number, String]),
            read_data(File);
        eof ->
            file:close(File);
        {error, Reason} ->
            io:format("Error reading file: ~p~n", [Reason]),
            file:close(File)
    end.