File Coverage

blib/lib/XML/Generator/RSS10/Module.pm

Criterion	Covered	Total	%
statement	3	12	25.0
branch			n/a
condition			n/a
subroutine	1	3	33.3
pod	0	2	0.0
total	4	17	23.5

package XML::Generator::RSS10::Module;
{
  $XML::Generator::RSS10::Module::VERSION = '0.02';
}

use strict;

sub Prefix {
    my $class = shift;

    $class =~ /^XML::Generator::RSS10::(\w+)$/;

    return $1;
}

sub contents {
    my $class = shift;
    my $rss   = shift;
    my $p     = shift;

    foreach my $elt ( sort keys %$p ) {
        $rss->_element_with_data( $class->Prefix, $elt, $p->{$elt} );
        $rss->_newline_if_pretty;
    }
}

1;

# ABSTRACT: Base class for module that implement RSS 1.0 modules



=pod

=head1 NAME

XML::Generator::RSS10::Module - Base class for module that implement RSS 1.0 modules

=head1 VERSION

version 0.02

=head1 SYNOPSIS

    package XML::Generator::RSS10::foobar'

    use base 'XML::Generator::RSS10::Module';


    sub NamespaceURI { 'http://example.com/foobar' }

=head1 DESCRIPTION

This module is the base class for all modules that implement RSS 1.0
module support.

=head1 AUTHOR

Dave Rolsky

=head1 COPYRIGHT AND LICENSE

This software is Copyright (c) 2011 by Dave Rolsky.

This is free software, licensed under:

  The Artistic License 2.0 (GPL Compatible)

=cut


__END__