Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re^2: Data::FormValidator, equivalent to "require_some_regexp"?

by trammell (Priest)
on Apr 20, 2007 at 14:13 UTC ( #611169=note: print w/ replies, xml ) Need Help??


in reply to Re: Data::FormValidator, equivalent to "require_some_regexp"?
in thread Data::FormValidator, equivalent to "require_some_regexp"?

I think that code can be tightened up a bit:

$profile->{require_some} = { foo_fields => [ 1, grep /^foo_\d+$/, $q->param ] };
But apart from that I'm afraid this is the best solution available to me. Thanks!


Comment on Re^2: Data::FormValidator, equivalent to "require_some_regexp"?
Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (9)
As of 2014-11-24 12:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (141 votes), past polls