Oogly. Eine Datenvalidierungsidee, die einfach ideal ist!
Jetzt downloaden

Oogly. Ranking & Zusammenfassung

Oogly. Stichworte

Perl-Modul Daten Datenvalidierung Validierung Daten zentralisieren Zentralisierer

Oogly. Beschreibung

Eine Datenvalidierungsidee, die einfach ideal ist! Das Oogly-Modul ist ein anderer Ansatz für die Datenvalidierung, es versucht, Datenvalidierungsregeln zu vereinfachen und zu zentralisieren, um den Trocknen zu gewährleisten (nicht wiederholen) Code.Bitte Hinweis! Es ist nicht die Absicht dieses Moduls, Validierungsroutinen bereitzustellen, sondern einen vereinfachten Überprüfungsablaufsteuerung und die Förderung der Code-Wiederverwendung. Das Folgende ist ein Beispiel dafür ... Verwenden Sie MyApp :: Validation; Meine $ app = myapp :: Validation-> NEUE (\% Params); if ($ app-> validate ('login', 'password')) {...} else {Print Join "\ n", @ {$ App-> Fehler}; } Paket MyApp :: Validierung Verwenden Sie Oogly QW / Mixin-Feld /; # Definieren Sie ein Mixin, eine Sortierschablone, die mit anderen Regeln # mit der Mixin-Richtlinie Mixin 'default' => {erforderlich => 1, min_length => 4, max_length => 255}; # Definieren Sie eine Datenvalidierungsregel für den Parameter "Anmelden" mit dem Standard-# -Mixin, in dem das `Login` zwischen 4-255 Zeichen lang sein muss und # mindestens einen Buchstaben- und Nummernfeld 'login' => {label => Benutzer login ', mixin =>' default ', validation => sub {My ($ self, $ Dies, $ Params) = @_; mein ($ name, $ vari) = ($ this -> {label}, $ params -> {login}); $ self-> fehler ($ Dies, "$ Name muss mindestens einen Buchstaben und eine Nummer enthalten"), es sei denn ($ value = ~ / / || $ wert = ~ / / ); }}; # Definieren Sie eine Datenvalidierungsregel für Parameter "Passwort" mit dem # zuvor definierten Feld "Login" als Mixin (Vorlage) Feld 'Passwort' => {mixin_field => 'login', label => 'Benutzerpasswort'}; und Nun für meinen zweiten und letzten Tat mit oogly außerhalb eines Pakets. #! / usr / bin / perl Verwenden Sie oogly qw /: alle /; Mein $ i = oogly (mixins => {default => {Erforderlich => 1, min_length => 4, max_length => 255}}, Felder => {login => {label => 'user login', mixin => 'Standard', Validierung => Sub {My ($ self, $ Dies, $ Params) = @_; My ($ Name, $ vari) = ($ this -> {Name}, $ params -> {login}) ; $ self-> Fehler ($ this "mindestens einen Buchstaben und Nummer enthält Namensfeld $ muss") if ($ value \ / / $ value \ / /! );}}, Password => {mixin_field => 'login', label => 'user password'}},); # Wichtig, speichern Sie die neue Instanz, die von der $ i-> Setup-Funktion $ O = $ i-> Setup erstellt wurde ({login => 'root', password => '...'}); if ($ o-> validate) {...} Anforderungen: · Perl.

Oogly. Zugehörige Software