Loading code of the amqp spec
This class serves as a loader for the auto-generated classes of the protocol.
Returns a binary string representing the header of any \s-1AMQP\s0 communications
Pass in the \s-1XML\s0 filename. Reads in the \s-1AMQP\s0 \s-1XML\s0 specifications file, \s-1XML\s0 document node <amqp>, and generates subclasses of Net::AMQP::Protocol::Base for each frame type.
Names are normalized, as demonstrated by this example:
<class name='basic'> <method name='consume-ok'> <field name='consumer tag'> </method> </class>
creates the class Net::AMQP::Protocol::Basic::ConsumeOk with the field accessor \*(C`consumer_tag()\*(C', allowing you to create a new object as such:
my $method = Net::AMQP::Protocol::Basic::ConsumeOk->new( consumer_tag => 'blah' );
print $method->consumer_tag() . "\n"; if ($method->class_id == 60 && $method->method_name == 21) { # do something }
Net::AMQP::Protocol->full_docs_to_dir($dir, $format);
Using the dynamically generated classes, this will create 'pod' or 'pm' files in the target directory in the following format:
$dir/Net::AMQP::Protocol::Basic::Publish.pod (or with format 'pm') $dir/Net/AMQP/Protocol/Basic/Publish.pm
The directory will be created if it doesn't exist.
Net::AMQP
Copyright (c) 2009 Eric Waters and XMission \s-1LLC\s0 (http://www.xmission.com/). All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the \s-1LICENSE\s0 file included with this module.
Eric Waters <[email protected]>