>
>> shift_days => [ $q->param('DoW') ]
>
>
> And it sorta works. Now, instead of getting the error message I actually
> get data in that column, but it's like this:
>
>> 14 | Second | 10:23:00 | 10:23:00 | ARRAY(0xa3a6130) |
>> 3 |
>
>
> Where the 'ARRAY' field should have in it 'MTWThF' (for this particular
> row). I'm passing this to a subroutine that looks like this:
>
> $dao->insert_shift(\%attrs); #Sub call
>
> Subroutine:
>
>> sub insert_shift {
>> my $self = shift;
>> my($attrs) = @_;
>>
>> my $m = $self->schema->resultset('Shifts')->new($attrs);
>> $m->insert;
>> }
>
>
>
> I /think/ the problem lies with the $attrs value. But I'm not sure what to
> do to fix it.
>
> Help?
Looks to me like you need to dereference $attrs to get the results you want.
check out:
perldoc perlref
for more information
HTH,
Chris
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/
