Params:: Validieren ist eine Perl-Baugruppe, zum von Methoden-/Funktionsparametern zu validieren.

SYNOPSE

Gebrauch Params:: Qw validieren (: alle);

# benannte Nehmen Params (Durcheinander oder hashref)
Vorfoo
{
validieren (@_, {foo => 1, # Vorschreiben
=> 0 verjähren, # wahlweise
}
);
}

# nimmt Positionsparams
Vorrechtsanwaltschaft
{
# erste sind zwei vorgeschrieben, ist an dritter Stelle wahlweise
validate_pos (@_, 1, 1, 0);
}


Vorfoo2
{
validieren (@_,
{foo =>
# einen Typen spezifizieren
{Typ => ARRAYREF},

=> verjähren
# eine Schnittstelle spezifizieren
{kann => [Druck, Fieberhitze, frobnicate]},

baz =>
{Typ => SCALAR, # ein Skalar…
#…, das ist eine normale ganze Zahl…
regex => qr/^d+$/,
Rückrufe =>
{#… und kleiner als 90
weniger => als 90 Vor {Schiebung () < 90},
},
}
}
);
}

Vorwith_defaults
{
mein validieren %p = (@_, {foo => 1, # erforderte
# ist $p {Rechtsanwaltschaft} 99, wenn Rechtsanwaltschaft nicht ist
# gegeben. Rechtsanwaltschaft ist jetzt wahlweise.
=> {Zahlungseinstellung => 99} verjähren});
}

sub pos_with_defaults
{
mein @p = validate_pos (@_, 1, {Zahlungseinstellung => 99});
}

Vorsets_options_on_call
{
mein %p = validate_with
(Params => @_,
Spezifikt. => {foo => {Typ SCALAR, Zahlungseinstellung => 2}},
normalize_keys => Unterseeboot {$_ [0] =~ s/^-//; lc $_ [0]},
);
}

Die Params:: Baugruppe validieren erlaubt Ihnen, Methoden- oder Funktionsaufrufparameter zu einem willkürlichen Niveau der Besonderheit zu validieren. Auf dem einfachsten Niveau ist sie zur Validierung der erforderlichen Parameter wurde gegeben fähig und die keine nicht spezifizierten zusätzlichen Parameter wurden innen geführt.

Sie ist auch zur Bestimmung fähig, dass ein Parameter von einem spezifischen Typen ist, dass es eine Nachricht einer bestimmten Kategorienhierarchie, dass es bestimmte Methoden besitzt oder des Anwendens von Gültigkeitserklärungrückrufen an den Argumenten ist.