MQSeriesQueueManager 队列管理器:
MQSeries::QueueManager - OO interface to the MQSeries Queue Manager
O O 面向对象 MQSeries 队列管理器:
语法:
use MQSeries qw(:functions);
use MQSeries::QueueManager;
#
# Simplest, trivial usage
#
my $qmgr = MQSeries::QueueManager->
new(QueueManager => 'some.queue.manager' ) ||
die("Unable to connect to queue manager\n");
[mqm@node01 mqm]$ cat t4.pl
use MQSeries qw(:functions);
use MQSeries::QueueManager;
#
# # Simplest, trivial usage
# #
my $qmgr = MQSeries::QueueManager->
new(QueueManager => 'YWJZZF_CZCB_SEND1' ) ||
die("Unable to connect to queue manager\n");
[mqm@node01 mqm]$ perl t4.pl
MQCONN failed (Reason = 2058) (Queue manager name not valid or not know