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 "<a href="http://sender.pl">sender.pl</a>" 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's new() function:<br>
<br> my $self =<br> {<br> _rabbit => Net::RabbitMQ->new(),<br> _rabbit_user => "guest",<br> _rabbit_pass => "guest",<br> _rabbit_host => "localhost",<br>
_rabbit_port => 5672,<br> _queue => $queue,<br> _channel => $channel,<br> _no_ack => $no_ack,<br> _queue_declared => '',<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"><<a href="mailto:majek04@gmail.com">majek04@gmail.com</a>></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 <<a href="mailto:iceblaze@gmail.com">iceblaze@gmail.com</a>> wrote:<br>
> I seem to be having problems with persistence using RabbitMQ, and I was<br>
> wondering if someone would help point out what I'm missing?<br>
><br>
> For example, <a href="http://pastebin.com/PRRHx5hF" target="_blank">http://pastebin.com/PRRHx5hF</a><br>
><br>
> I run the "send" function 20 times to fill the queue with 20 messages, then<br>
> I run rabbitmqadmin list queues, and after /etc/init.d/rabbitmq-server<br>
> restart. Finally. I run rabbitmqadmin list queues again and as you can see<br>
> the queue and exchange persist, but the messages are lost.<br>
><br>
> I can provide any other information if necessary.<br>
<br>
</div>I can't spot any obvious issue. I'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>"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're capitalists--and when to let them think they're communists." - Programming Perl third edition<br>