1package WebService::GData::Node::Atom::EntryEntity; 2use base 'WebService::GData::Node::Atom::AtomEntity'; 3use WebService::GData::Node::Atom::Content(); 4use WebService::GData::Node::Atom::Summary(); 5use WebService::GData::Node::Atom::Entry(); 6use WebService::GData::Node::Atom::Published(); 7our $VERSION = 0.01_01; 8 9sub __init { 10 my ($this,$params) = @_; 11 12 $this->SUPER::__init($params); 13 $this->_entity(new WebService::GData::Node::Atom::Entry('gd:etag'=>$this->{_feed}->{'gd$etag'})); 14 $this->{_content}= new WebService::GData::Node::Atom::Content($this->{_feed}->{content}); 15 $this->{_summary}= new WebService::GData::Node::Atom::Summary($this->{_feed}->{summary}); 16 $this->{_published}= new WebService::GData::Node::Atom::Published($this->{_feed}->{published}); 17 $this->_entity->child($this->{_published})->child($this->{_summary})->child($this->{_content}); 18 $this->set_children; 19 20} 21 22 23"The earth is blue like an orange."; 24 25__END__ 26