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.

REPOSITORY

Fork this module on GitHub: https://github.com/zoffixznet/Net-OBEX

BUGS

To report bugs or request features, please use https://github.com/zoffixznet/Net-OBEX/issues

If you can't access GitHub, you can email your request to bug-Net-OBEX at rt.cpan.org

AUTHOR

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

LICENSE

You can use and distribute this module under the same terms as Perl itself. See the LICENSE file included in this distribution for complete details.