matthew couchman (JIC) wrote:
> OK, my mistake. Here are the results of your script when run against our
> MySQL server:
>
> ...
> ok 25 - CDs created successfully
> SELECT YEAR( year ) FROM cd me GROUP BY year ORDER BY year:
> ok 26 - Years group successfully
> INSERT INTO cd ( artist, title, y
Ovid wrote:
> In DBIx::Class 0.08100 and newer, for DBIx::Class::Row:
>
> sub set_column {
> my ($self, $column, $new_value) = @_;
>
> $self->{_orig_ident} ||= $self->ident_condition;
> my $old_value = $self->get_column($column);
>
> $self->store_column($column, $new_value);
>
I'm in the process of developing a prototype webapp that uses Comet.
The Perl side is CGI::Application and DBIx::Class. I'm using Orbited to do
Comet. I communicate to the MQ via STOMP.
I'd like to intercept calls to the DBand turn them into messages that go out to
the MQ.
So, if I do a $sche
On Fri, Jan 8, 2010 at 2:46 PM, David Schmidt wrote:
> I add some roles, then add a user and give him some roles.
> if i want to print the roles using
>
> foreach ($user->roles) { print "Role: " . $_->name . ", " . $_->id . "\n"; }
>
> I get
>
> Role: admin, 1
> Role: undef, 2
> Role: undef, 3
>
>
I add some roles, then add a user and give him some roles.
if i want to print the roles using
foreach ($user->roles) { print "Role: " . $_->name . ", " . $_->id . "\n"; }
I get
Role: admin, 1
Role: undef, 2
Role: undef, 3
If I use $_->get_column('name') I get
Role: admin, 1
Role: user, 2
Role: