Catalyst Maintainable web apps made easy! #55
# try some metadata
my $metadata = rs('TaskMetadata')->create({ task  => $task3,
                                            tag   => 'key',
                                            value => 'value',
                                          });

is($metadata->task->task, 'more stuff for foo', 'metadata knows about task');
is([$task3->metadata]->[0]->tag, 'key', 'got key == key for metadata');
Copyright © 2007 Jonathan Rockway