AI :: Freehal :: Klasse

Unterstützung für die Erstellung von Standard-"Inn-Out" -Klätern
Jetzt downloaden

AI :: Freehal :: Klasse Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Tobias Schulz
  • Website des Verlags:
  • http://search.cpan.org/~tschulz/

AI :: Freehal :: Klasse Stichworte


AI :: Freehal :: Klasse Beschreibung

Unterstützung für die Erstellung von Standard-"Inn-Out" -Klätern AI :: FreeHAL :: Klasse ist ein Perl-Modul, das Unterstützung für das Erstellen von Standard-"Inn-Out-Klassen" anbietet.Synopsis-Paket MyClass; Verwenden Sie AI :: FreeHal :: Klasse; # Speicherung für Objektattribute erstellen ... MY% Name: Attr; Mein% Rang: Attr; meine% Snum: Attr; mein% public_data: attr; # Umgang mit Initialisierung von Objekten dieser Klasse ... Sub Build {My ($ self, $ obj_id, $ arg_ref) = @_; $ Name {$ obj_id} = check_name ($ arg_ref -> {Name}); $ Rang {$ obj_id} = check_rank ($ arg_ref -> {Rang}); $ SNUM {$ obj_id} = _Gen_uniq_serial_num (); } # Griff Cleanup von Objekten dieser Klasse ... sub demolish {My ($ self, $ obj_id) = @_; _Recycle_serial_num ($ SNUM {$ obj_id}); } # Griff unbekannter Methodenaufrufe ... sub automethod {mein ($ self, $ obj_id, @other_args) = @_; # Rendieren Sie alle öffentlichen Daten ... Wenn (m / a Get _ (. *) /) {# Methodenname in $ _ my $ get_what = $ 1; sub {return $ public_data {$ obj_id} {$ get_what}; }} warnen "kann nicht $ method_name on", ref $ self, "objekt"; Rückkehr; # Der Anruf wird abgelehnt, indem kein Sub-REF} zurückgegeben wird. c) 2005 von O'Reilly Media, Inc. und mit Erlaubnis nachgedruckt. Anforderungen: · Perl.


AI :: Freehal :: Klasse Zugehörige Software