rabbitmq-tutorials/common-lisp/send.lisp
2016-03-02 04:24:38 -08:00

15 lines
280 B
Bash
Executable File

#!/bin/sh
sbcl --noinform --noprint <<EOF
(ql:quickload :cl-bunny.examples)
(in-package :cl-bunny.examples)
(with-connection ("amqp://")
(with-channel ()
(publish (exchange.default) "Hello world!" :routing-key "hello")
(format t " [x] Sent 'Hello World!'~%")))
EOF