Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Problems with not so trivial data validation using Data::FormValidator

by roboticus (Canon)
on Feb 01, 2013 at 00:35 UTC ( #1016417=note: print w/ replies, xml ) Need Help??


in reply to Problems with not so trivial data validation using Data::FormValidator

ted.byers:

I've never used Data::FormValidator, but looking at your code and the error message leads me to think that your second constraint should be more like:

{ constraint=>sub {after_today('%m%y')}, name => 'card_expired' }

I came to that conclusion because after_today('%m%y') by itself isn't a code reference, but a function call. (Of course if after_today returned a code reference, then my suggestion is worth a bucket of mud.)

Also for block quotes, I tend to use <blockquote><i> ... </i></blockquote>.

...roboticus

When your only tool is a hammer, all problems look like your thumb.


Comment on Re: Problems with not so trivial data validation using Data::FormValidator
Select or Download Code
Re^2: Problems with not so trivial data validation using Data::FormValidator
by ted.byers (Scribe) on Feb 01, 2013 at 01:33 UTC

    Thanks

    I gave that a try, but alas, it didn't change anything. I still get the same error.

    Thanks anyway.

    Ted

      ted.byers:

      Have you looked at the tests for the module? You can use the test "t/multiple_constraints.t" as an example and build on it to find out how to use multiple constraints.

      ...roboticus

      When your only tool is a hammer, all problems look like your thumb.

        I had not, but now I have. Here is the example there:

        my %data = ( multiple => 'to fail', #multiple => [qw{this multi-value input will fail on the constraint +below}], single => 'to pass', ); my %profile = ( required => [qw/ multiple single /], constraints => { multiple => [ { name => 'constraint_1', constraint => qr/\w/ }, # pass { name => 'constraint_2', constraint => qr/\d/ }, # force fail + ], }, ); my $results = Data::FormValidator->check(\%data, \%profile);

        The only difference, apart from using a regular expression, I see there is that they have the field name where the example from the documentation, and I, have a dummy nme, and where I, and the documentation, have the filed name as the first value in the array, the test does not. But, When I modify my code to resemble the code in that test, I still get the same error.

        This is so frustrating.

        Thanks

        Ted

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1016417]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (6)
As of 2014-07-13 14:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (250 votes), past polls