rabbitmq-tutorials/erlang/send.erl
Marek Majkowski 6b0432f6ef Whitespace.
2010-12-13 16:37:54 +00:00

22 lines
801 B
Erlang
Executable File

#!/usr/bin/env escript
%%! -pz ./amqp_client ./rabbit_common ./amqp_client/ebin ./rabbit_common/ebin
-include_lib("amqp_client/include/amqp_client.hrl").
main(_) ->
{ok, Connection} = amqp_connection:start(network,
#amqp_params{host = "localhost"}),
{ok, Channel} = amqp_connection:open_channel(Connection),
amqp_channel:call(Channel, #'queue.declare'{queue = <<"hello">>}),
amqp_channel:cast(Channel,
#'basic.publish'{
exchange = <<"">>,
routing_key = <<"hello">>},
#amqp_msg{payload = <<"Hello World!">>}),
io:format(" [x] Sent 'Hello World!'\n"),
ok = amqp_channel:close(Channel),
ok = amqp_connection:close(Connection),
ok.