John Porter wrote:
> 
> Michael G Schwern wrote:
> > > Give me data aggregation by inheritance
> > Oooh, now that would be useful.
> 
> Of course it would.  That's why nearly every OO language (beside Perl)
> has it.

        package circular_list_node;
        ... # defines how the list_nodes do their quaint folk dances


        package some_listable_datum;
        @ISA = qw< circular_list_node >;

        sub new{
                my $self = new circular_list_node;
                ...


That isn't data aggregation by inheritance?


-- 
                                           David Nicol 816.235.1187
                        And the cow threw up seven times, and said:
            "Say it now and say it loud, I'm a cow and I am proud."

Reply via email to