通过TCP在Erlang中发送二进制文件

-module(send_file).
-export([send_file/2]).

send_file(Host, FilePath) ->
    {ok, Binary} = file:read_file(FilePath),
    {ok, Socket} = gen_tcp:connect(Host, 8080, [binary, {packet, 0}]),
    ok = gen_tcp:send(Socket, Binary),
    ok = gen_tcp:close(Socket).

erlc send_file.erl

erl -noshell -s send_file send_file "remote_host" "path/to/binary/file" -s init stop