ASCOPE::Class::Text::Collection - Aaron's class thingy for holding a bunch of ASCOPE::Class::Text::* thingies.
use ASCOPE::Class::Text; use ASCOPE::Class::Text::CDATA; use ASCOPE::Class::Text::Collection;
my $collection = ASCOPE::Class::Text::Collection->new();
$collection->add(ASCOPE::Class::Text->new("ook")); $collection->add(ASCOPE::Class::Text::CDATA->new("ook")); $collection->add(ASCOPE::Class::Text->new("ook"));
print $collection;
# prints: # ook <![CDATA[ook]]> ook
Aaron's class thingy for holding a bunch of ASCOPE::Class::Text::* thingies.
Override the object's ``'' operator to join all of the elements passed to the object and return a string.
new(@stuff)
Returns an object. Woot!
add(@stuff)
Add one or more elements to the object.
1.0
$Date: 2003/03/12 02:33:31 $
the ASCOPE::Class::Text manpage
Copyright (c) 2003, Aaron Straup Cope. All Rights Reserved.
This is free software, you may use it and distribute it under the same terms as Perl itself.