Katalysator :: controller :: beperkingen CATALYST :: Controller :: Constraints bevat beperking handtekeningen voor controlleracties.
Download nu

Katalysator :: controller :: beperkingen Rangschikking & Samenvatting

Katalysator :: controller :: beperkingen Tags

Perl-module dwang handtekeningen constraint Handtekeningen Controlleracties

Katalysator :: controller :: beperkingen Beschrijving

Katalysator :: Controller :: Constraints bevat beperking handtekeningen voor controlleracties. Katalysator :: Controller :: Constraints bevat beperking handtekeningen voor controller acties.synopsis pakket myapp :: controller :: foo; ... gebruik basis qw (katalysator :: controller :: beperkingen); __Package __-> Config (beperkingen => {# Sta alleen cijfers toe voor type 'integer' integer => qr / ^ D + $ /, # Word alleen woord tekens toe voor type 'woord' Word => sub {/ ^ w + $ /}, # Valideer de gebruikers-ID en het opblazen van objectgebruiker => {# Controleer de gebruikers-ID-cheque => sub {mijn ($ zelf, $ C, $ id) = @_; retourneer $ c-> is_valid_user_id ($ id);}; # Doorsturen naar deze actie Als de validatie mislukte on_fail => 'Invalid_user', # Als waarde geldig is, voer deze dan door dit filter # na after_filter => sub {My ($ Self, $ C, $ ID) = @_; $ C-> FETCH_USER_BY_ID ($ ID);},} # Inheritance HighInteger => {inherit_from => 'integer', check => sub {$ _> 22},}, # Collapse Meerdere argumenten MyDate => {# neem drie gehele getallen in en retourneer een waarde duurt => 3, geeft => 1, # opblazen aan een datetime-object post_filter => sub {mijn ($ m, $ c, $ y, $ m, $ d) = @_; Datetime-> Nieuw (jaar => $ y, maand => $ m, dag => $ d);}}}); # Voeg twee gehele getallen toe, gooit gewoon een uitzondering op de subtoevallen van de beperking van de beperking: lokale args (2) beperkingen (geheel getal A, integer b) {mijn ($ zelf, $ c) = @_; $ c-> res-> lichaam ($ _ {a} + $ _ {b}); } # Zet het woord in de voorraad, onder de toets 'Foo' sub stashword: Lokale Args (1) beperkingen (Word foo *) {} # user_obj eindigt als een gebruikersobject in de stash subview_user: lokale args (1) beperkingen (User User_BJ *) {} sub ongeldig_User: privé {# handleiDIID UserID} 1; vereisten: · PERL-vereisten: · Perl

Katalysator :: controller :: beperkingen Gerelateerde software