NAME

Tibco::Rv - Perl bindings and Object-Oriented library for TIBCO's TIB/Rendezvous

SYNOPSIS

        use Tibco::Rv;

        my ( $rv ) = new Tibco::Rv;

        my ( $listener ) =
           $rv->createListener( $rv->defaultTransport, 'ABC', sub
        {
           my ( $msg ) = @_;
           print "Listener got a message: $msg\n";
        } );

        my ( $timer ) = $rv->createTimer( 2, sub
        {
           my ( $msg ) = $rv->createMsg;
           $msg->addString( field1 => 'myvalue' );
           $msg->addString( field2 => 'myothervalue' );
           $msg->sendSubject( 'ABC' );
           print "Timer kicking out a message: $msg\n";
           $rv->defaultTransport->send( $msg );
        } );

        my ( $killTimer ) = $rv->createTimer( 7, sub { $rv->stop } );

        $rv->start;
        print "finished\n"

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