File Coverage

blib/lib/XML/XBEL/Separator.pm

Criterion	Covered	Total	%
statement	6	6	100.0
branch			n/a
condition			n/a
subroutine	2	2	100.0
pod			n/a
total	8	8	100.0

use strict;
package XML::XBEL::Separator;

use base qw (XML::XBEL::base
	     XML::XBEL::thingy
	     XML::XBEL::serialize);

# $Id: Separator.pm,v 1.2 2004/06/23 04:15:12 asc Exp $

=head1 NAME

XML::XBEL::Separator - OOP for reading and writing XBEL separators

=head1 SYNOPSIS

 use XML::XBEL::Separator;

=head1 DESCRIPTION

OOP for reading and writing XBEL separators

=cut

use XML::LibXML;

=head1 PACKAGE METHODS

=cut

=head2 __PACKAGE__->new()

Returns an I object.

=cut

sub new {
    my $pkg = shift;

    my $root = XML::LibXML::Element->new("separator");
    my $self = bless {'__root' => $root }, $pkg;

    return $self;
}

=head1 OBJECT METHODS

=cut

=head2 $obj->delete()

Delete an XBEL separator.

=cut

# Defined in XML::XBEL::thingy

=head2 $obj->toString($format)

=cut

# Defined in XML::XBEL::serialize

=head2 $obj->toFile($filename,$format)

=cut

# Defined in XML::XBEL::serialize

=head2 $obj->toFH(\*$fh,$format)

=cut

# Defined in XML::XBEL::serialize

=head1 VERSION

$Revision: 1.2 $

=head1 DATE

$Date: 2004/06/23 04:15:12 $

=head1 AUTHOR

Aaron Straup Cope [e-mail]

=head1 SEE ALSO

L

L

L

L

=head1 LICENSE

Copyright (c) 2004 Aaron Straup Cope. All rights reserved.

This is free software, you may use it and distribute it under the
same terms as Perl itself.

=cut

return 1;