AI :: FreeHal :: Klasse Ondersteuning voor het maken van standaard "Inside-out" -klassen
Download nu

AI :: FreeHal :: Klasse Rangschikking & Samenvatting

AI :: FreeHal :: Klasse Tags

Perl-module klassen binnenstebuiten inside-out klassen FreeHAL

AI :: FreeHal :: Klasse Beschrijving

Ondersteuning voor het maken van standaard "Inside-out" -klassen AI :: FreeHal :: Klasse is een PERL-module die ondersteuning biedt voor het maken van standaard "Inside-out" -klassen. Synopsis-pakket MyClass; Gebruik AI :: FreeHal :: Klasse; # Maak opslag voor objectattributen ... Mijn% Naam: ATW; Mijn% Rank: ATW; Mijn% SNUM: ATWET; My% Public_Data: Attward; # Handvat initialisatie van objecten van deze klasse ... sub build {my ($ self, $ obj_id, $ arg_ref) = @_; $ naam {$ obj_id} = check_name ($ arg_ref -> {naam}); $ RANG {$ OBJ_ID} = check_rank ($ ARG_REF -> {RANG}); $ Snum {$ OBJ_ID} = _gen_uniq_serial_num (); } # Handvat opruimen van objecten van deze klasse ... sub sloop {mijn ($ self, $ obj_id) = @_; _recycle_serial_num ($ SNUM {$ OBJ_ID}); } # Handvat onbekende methode-oproepen ... sub automethod {My ($ self, $ obj_id, @other_args) = @_; # Retourneer alle openbare gegevens ... Als (M / A Get _ (. *) /) {# Method-naam is gepasseerd in $ _ My $ GET_WHAT = $ 1; Return Sub {return $ public_data {$ obj_id} {$ get_what}; }} Warn "Kan $ Method_name niet bellen op", Ref $ Self, "Object"; opbrengst; # De oproep wordt geweigerd door het niet terug te sturen van een sub Ref} Deze module biedt hulpmiddelen die helpen bij het implementeren van het "binnenstebuiten-object" -klasse-structuur op een handige en standaardweg. Sportions van de volgende code en documentatie van "PERL BESTE PRAKTIJKEN" Copyright ( c) 2005 door O'Reilly Media, Inc. en herdrukt met toestemming. Vereisten: · Perl

AI :: FreeHal :: Klasse Gerelateerde software