#!/usr/bin/perl
use warnings;
use strict;

use Mail::Qmail::Queue::Message;

# This works, message available
my $msg = Mail::Qmail::Queue::Message->receive();

# This never returns... at all
$ret_val = $msg->send(QmailQueue  => '/var/qmail/bin/qmail-queue.old')