neilwatson has asked for the wisdom of the Perl Monks concerning the following question:
I'm getting this error message that is to vague for me to follow.
My code base is large. I'll list the beginning parts since I think that might be the problem. FirstGoto undefined subroutine &Carp::longmess_real at /usr/share/perl5/Car +p.pm line 35, <FH> line 1.
And the module.#!/usr/bin/perl BEGIN { push @INC, "/home/neil/perl5/lib/perl5" } use strict; use warnings; use local::lib; use Evolvethinking::Mymodule; use POSIX 'strftime';
package Mymodule; { use Mouse; use Mouse::Util::TypeConstraints; use Socket; ... subtype 'my_timestamp', => as 'Str', => where { m/^\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}$/ }, => message { 'Not a valid timestamp. Expect: yyyy-mm-d +d hh:mm' }; has 'timestamp' => ( is => 'ro', isa => 'my_timestamp' );
Update
Carp::Any shows that my typing is working properly by returning an error. However, I wonder why the error was so vague.Also, is there a way to have this typing do something other than exit? I'd really like to to just return none zero.Attribute (insert_class) does not pass the type constraint because: No +t a valid class at /home/neil/perl5/lib/perl5/x86_64-linux-thread-mul +ti/Mouse/Util.pm line 383, <FH> line 1. Mouse::Util::throw_error('Mouse::Meta::Attribute=HASH(0x161869 +8)', 'Attribute (insert_class) does not pass the type constraint be.. +.', 'data', '192_168_0_151', 'depth', -1) called at /home/neil/perl5/ +lib/perl5/x86_64-linux-thread-multi/Mouse/Util.pm line 383, <FH> line + 1. Mouse::Util::throw_error('Mouse::Meta::Attribute=HASH(0x161869 +8)', 'Attribute (insert_class) does not pass the type constraint be.. +.', 'data', '192_168_0_151', 'depth', -1) called at ./p1.pl line 35 .... subtype 'my_insert_class', => as 'Str', => where { m/^[a-zA-Z0-9]+$/ }, => message { '$_ is not a valid class' }; has 'insert_class' => ( is => 'rw', isa => 'my_insert_class' );
Neil Watson
watson-wilson.ca
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Help with vague Carp error message
by tobyink (Canon) on Sep 28, 2012 at 06:28 UTC | |
by neilwatson (Priest) on Sep 28, 2012 at 11:01 UTC | |
by tobyink (Canon) on Sep 28, 2012 at 13:06 UTC | |
by neilwatson (Priest) on Sep 29, 2012 at 00:34 UTC | |
by Anonymous Monk on Sep 29, 2012 at 01:12 UTC | |
Re: Help with vague Carp error message
by Anonymous Monk on Sep 28, 2012 at 02:25 UTC |
Back to
Seekers of Perl Wisdom