Hello Marek,<br><br>Thanks for attempting to assist me here. I have made a light version of the module and a sender script as you requested. You can find the files here:<br><br><a href="http://iceblaze.com/rabbit.zip">http://iceblaze.com/rabbit.zip</a><br>
<br>Simply unzip the files into the same directory and run the &quot;<a href="http://sender.pl">sender.pl</a>&quot; script. Note that you will need to install Net::RabbitMQ from CPAN. You can also modify the login credentials for rabbit (right now its just using guest/guest) in $self of Rabbit.pm&#39;s new() function:<br>
<br>������� my $self =<br>������� {<br>��������������� _rabbit =&gt; Net::RabbitMQ-&gt;new(),<br>��������������� _rabbit_user =&gt; &quot;guest&quot;,<br>��������������� _rabbit_pass =&gt; &quot;guest&quot;,<br>��������������� _rabbit_host =&gt; &quot;localhost&quot;,<br>
��������������� _rabbit_port =&gt; 5672,<br>��������������� _queue =&gt; $queue,<br>��������������� _channel =&gt; $channel,<br>��������������� _no_ack =&gt; $no_ack,<br>��������������� _queue_declared =&gt; &#39;&#39;,<br>
������� };<br><br>-James<br><br><br><div class="gmail_quote">On Tue, Apr 3, 2012 at 5:30 AM, Marek Majkowski <span dir="ltr">&lt;<a href="mailto:majek04@gmail.com">majek04@gmail.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div class="im">On Tue, Apr 3, 2012 at 00:01, iceblaze &lt;<a href="mailto:iceblaze@gmail.com">iceblaze@gmail.com</a>&gt; wrote:<br>
&gt; I seem to be having problems with persistence using RabbitMQ, and I was<br>
&gt; wondering if someone would help point out what I&#39;m missing?<br>
&gt;<br>
&gt; For example, <a href="http://pastebin.com/PRRHx5hF" target="_blank">http://pastebin.com/PRRHx5hF</a><br>
&gt;<br>
&gt; I run the &quot;send&quot; function 20 times to fill the queue with 20 messages, then<br>
&gt; I run rabbitmqadmin list queues, and after /etc/init.d/rabbitmq-server<br>
&gt; restart. Finally. I run rabbitmqadmin list queues again and as you can see<br>
&gt; the queue and exchange persist, but the messages are lost.<br>
&gt;<br>
&gt; I can provide any other information if necessary.<br>
<br>
</div>I can&#39;t spot any obvious issue. I&#39;m not a perl expert - could<br>
you supply me with a runnable script that sends messages?<br>
(and clear instructions how to run it)<br>
<br>
Cheers,<br>
 �Marek<br>
</blockquote></div><br><br clear="all"><br>-- <br>&quot;Of course, the actual government of any computer is run by that fascist dictator known as the operating system. But a wise dictator knows when to let the people think they&#39;re capitalists--and when to let them think they&#39;re communists.&quot; - Programming Perl third edition<br>