1 package XML::Feed::Enclosure;
6 use base qw( Class::ErrorHandler );
11 bless { %$c }, $class;
16 my $enclosure = shift;
18 $enclosure->{$var} = shift if @_;
22 sub type { shift->_var('type', @_) }
23 sub length { shift->_var('length', @_) }
24 sub url { shift->_var('url', @_) }
31 XML::Feed::Enclosure - Wrapper for enclosure objects
35 my ($enclosure) = $entry->enclosure;
36 print $enclosure->type;
40 I<XML::Feed::Enclosure> represents a content object in an I<XML::Feed::Entry>
41 entry in a syndication feed.
47 Take params and turn them into a I<XML::Feed::Enclosure> object.
51 A synonym for I<wrap>.
53 =head2 $enclosure->url
55 The url of the object.
57 =head2 $enclosure->type
59 The MIME type of the item referred to in I<url>.
61 =head2 $enclosure->length
63 The length of object refereed to in I<url>
65 =head1 AUTHOR & COPYRIGHT
67 Please see the I<XML::Feed> manpage for author, copyright, and license