/ 
Net-OBEX-Packet-Request-0.003
/ Net::OBEX::Packet::Request::Base

NAME

Net::OBEX::Packet::Request::Base - base class for OBEX request packet modules.

SYNOPSIS

package Net::OBEX::Packet::Request::Some;

use strict;
use warnings;
our $VERSION = '0.001';
use Carp;

use base 'Net::OBEX::Packet::Request::Base';

sub make {
    my $self = shift;
    my $headers = join '', @{ $self->headers };

    # "\x00" is the opcode
    my $packet = "\x00" . pack( 'n', 3 + length $headers) . $headers;

    return $self->raw($packet);
}

1;

__END__

DESCRIPTION

WARNING!!! This module is in an early alpha stage. It is recommended that you use it only for testing.

The module is a base class for OBEX request packet modules.

It defines a constructor (new()), as well as headers() and raw() accessors/mutators.

AUTHOR

Zoffix Znet, <zoffix at cpan.org> (http://zoffix.com, http://haslayout.net)

BUGS

Please report any bugs or feature requests to bug-net-obex-packet-request at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-OBEX-Packet-Request. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Net::OBEX::Packet::Request

You can also look for information at:

COPYRIGHT & LICENSE

Copyright 2008 Zoffix Znet, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.