Hi!
while( my $artist = $rs->next)
{
print $artist->cds->title . "\n\n";
}
The "cds" relations is has_many, so you'll probably want to do this to display
all CD title of all artists:
while( my $artist = $rs->next) {
my $cds = $artist->cds;
while ( my $cd = $cds->next ) {
print $cd->title . "\n\n";
}
}
If you only expect one CD per artist, you can do as follows:
while( my $artist = $rs->next) {
print $artist->cds->first->title . "\n\n";
}
Michele.
_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/
