Re: Config::Validate: problem with a key type

in reply to Config::Validate: problem with a key type

Quoting the perldoc:

string
The string type does no validation if no addition restrictions are specified. Valid options are:

* min
Minimum length
* max
Maximum length
* regex
String must match the regex provided.

Comment on Re: Config::Validate: problem with a key type

Replies are listed 'Best First'.
Re^2: Config::Validate: problem with a key type by Hue-Bond (Priest) on Mar 22, 2010 at 18:05 UTC
Adding those additional restrictions has no effect. This is my current `$schema`: `my $schema = { section => { type => 'nested', child => { key => { type => 'string', regex => qr/^ ARRAY \( 0x\p{HexDigit}{1,8} \) $/x, }, }, }, };` [download] The code still runs to completion. If I make the regex different (e.g. by changing "ARRAY" into "ARAY"), the code complains about the data not matching the schema. Looks like a bug to me... Thank you for giving me the clue! -- David Serrano (Please treat my english text just like Perl code, i.e. feel free to notify me of any syntax, grammar, style and/or spelling error. Thank you!).	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Config::Validate: problem with a key type
by Hue-Bond (Priest) on Mar 22, 2010 at 18:05 UTC

Adding those additional restrictions has no effect. This is my current $schema:

my $schema = {
    section => { 
        type => 'nested',
        child => { 
            key => { 
                type  => 'string',
                regex => qr/^ ARRAY \( 0x\p{HexDigit}{1,8} \) $/x,
            },   
        },   
    },   
};
[download]

The code still runs to completion. If I make the regex different (e.g. by changing "ARRAY" into "ARAY"), the code complains about the data not matching the schema. Looks like a bug to me...

Thank you for giving me the clue!

--
David Serrano
(Please treat my english text just like Perl code, i.e. feel free to notify me of any syntax, grammar, style and/or spelling error. Thank you!).

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom