On 12-05-31 06:28 PM, Mark Haney wrote:
sub insert_shift {
       my $self = shift;
       my $attrs = @_;

Should this be:
    my %attrs = @_;


       my $m = $self->schema->resultset('Shifts')->new(attrs);

    my $m = $self->schema->resultset('Shifts')->new(%attrs);

       $m->insert;
}


--
Just my 0.00000002 million dollars worth,
  Shawn

Programming is as much about organization and communication
as it is about coding.

        _Perl links_
official site   : http://www.perl.org/
beginners' help : http://learn.perl.org/faq/beginners.html
advance help    : http://perlmonks.org/
documentation   : http://perldoc.perl.org/
news            : http://perlsphere.net/
repository      : http://www.cpan.org/
blog            : http://blogs.perl.org/
regional groups : http://www.pm.org/

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to