in reply to Re: Class::DBI and a self-referencing many-to-many
in thread Class::DBI and a self-referencing many-to-many

I have a couple of questions. First, regarding that syntax. This means (if I understand CDBI correctly) that I need to use my classes as so: 
my $parent1 = Person->create({ name => 'P1' });
my $parent2 = Person->create({ name => 'P2' });

my $child = Person->create({ name => 'C1' });

# This seems like a cumbersome way to set up the relationships
$child->add_to_parents({ parent => $parent1 });
$child->add_to_parents({ parent => $parent2 });

# Or, alternatively
# $parent1->add_to_children({ child => $child });
# $parent2->add_to_children({ child => $child });

[download]

Is there any way to sucessfully set those relationships when I'm constructing the objects?

Also, I thought of adding a single parent_id column to the person table, but wouldn't that prevent a given person from having multiple parents?

Replies are listed 'Best First'.
Re^3: Class::DBI and a self-referencing many-to-many
by perrin (Chancellor) on Sep 14, 2005 at 20:50 UTC
    Your syntax for adding parents looks correct, or you could just call create() on your linking table directly. What is it that you don't like about it? Do you have an example of alternative syntax you'd like to use?

    You're right that my parent_id column idea would mean only a single parent. I was thinking of a tree in computer science terms, where a node can only have one parent. What you want is probably a directed graph rather than a tree.

[reply]
      my $parent1 = Person->create({ name => 'P1' }); my $parent2 = Person->create({ name => 'P2' }); I guess I was hoping to say something like this: 
      my $parent = Person->create({ name => 'P' });

my $child = Person->create({ name => 'C1', parent => $parent });

      [download]
      But I can live without it. :-)
[reply]
[d/l]
        Just make your own method that takes these arguments and calls create on both tables.
[reply]

In Section Seekers of Perl Wisdom