NAME
Tib::Rv - Perl bindings and Object-Oriented library for TIBCO's TIB/Rendezvous
SYNOPSIS
use Tib::Rv;
my ( $rv ) = new Tib::Rv;
my ( $msg ) = new Tib::Rv::Msg;
$msg->addString( field => 'value' );
$msg->setSendSubject( 'ABC' );
my ( $transport ) = new Tib::Rv::Transport;
my ( $queue ) = new Tib::Rv::Queue;
my ( $listener ) = $queue->createListener( $transport, 'ABC', sub
{
my ( $msg ) = @_;
print "I got a message: $msg\n";
} );
my ( $timer ) =
$queue->createTimer( 1.5, sub { $transport->send( $msg ) } );
$timer->onEvent;
my ( $dispatcher ) = $queue->createDispatcher( 2 );
sleep( 5 );
DESCRIPTION
AUTHOR
Paul Sturm, sturm@branewave.com
TIB/Rendezvous copyright notice:
/* * Copyright (c) 1998-2000 TIBCO Software Inc. * All rights reserved. * TIB/Rendezvous is protected under US Patent No. 5,187,787. * For more information, please contact: * TIBCO Software Inc., Palo Alto, California, USA * * @(#)tibrv.h 2.9 */
SEE ALSO
http://www.tibco.com file:///$TIB_HOME/tibrv/doc