Sınıf :: meta Sınıf :: Meta, perl sınıfı bir otomasyon, iç içe ve veri doğrulamasıdır.
Şimdi İndirin

Sınıf :: meta Sıralama ve Özet

Sınıf :: meta Etiketler

sınıf veri doğrulama otomasyon sınıf otomasyonu Sınıf İçme

Sınıf :: meta Açıklama

Sınıf :: Meta, perl sınıfı bir otomasyon, içsel iç gözlük ve veri doğrulamasıdır. Sınıf :: Meta, perl sınıfı bir otomasyon, iç gözlem ve veri doğrulamasıdır. Bir sınıf: Paket MyApp :: şey; sıkı kullanmak; KULLANIM Sınıfı :: meta; KULLANIM Sınıfı :: Meta :: Tipler :: String; KULLANIM Sınıfı :: Meta :: Tipler :: Sayısal; Başlamak {# Bir sınıf oluşturun :: Bu sınıf için meta nesnesi. $ cm = Sınıf :: meta-> Yeni (Key => 'Thingy'); # Bir yapıcı ekleyin. $ cm-> Add_Constructor (İsim => 'Yeni', Oluştur => 1,); # Üretilen yöntemlerle birkaç özellik ekleyin. $ cm-> add_attribute (name => 'uuid', authz => Sınıf :: meta :: Oku, Type => 'string', Gerekli => 1, Varsayılan => Sub {Veri :: UUID-> YENİ-> create_str},); $ cm-> add_attribute (ad => 'ad', => 'string', gerekli => 1, varsayılan => UNDEF,); $ cm-> add_attribute (ad => 'yaş', => 'tam sayı', varsayılan => UNDEF,); # Özel bir yöntem ekleyin. $ cm-> add_method (name => 'chk_pass', görünüm => Sınıf :: Meta :: halka açık,); $ cm-> inşa; } Sonra sınıfı kullanın: MyApp :: şey kullanın; $ thingy = myApp :: thingy-> yeni; "ID:", $ Thingy-> ID, $ /; $ thingy-> isim ('larry'); Yazdır "İsim:", $ Thingy-> Ad, $ /; $ şey-> Yaş (42); "Yaş:", $ thingy-> yaş, $ /; veya intropsiyon API'sini kullanın: MyApp :: şey kullanın; $ sınıfım = myApp :: thingy-> my_class; $ şeyim; "Sınıfın Nesnesini İnceleme", $ Sınıf-> Paket, $ /; "Ngonstructors: n" yazdırın; $ CTOR'ım için ($ Sınıf-> Yapıcılar) {"O", $ CTOR-> NAME, $ /; $ thingy = $ ctor-> Call ($ class-> paketi); } Yazdır "Nattributes: n"; $ attr ($ class-> özniteliklerim) için {baskı "O", $ ATTRO-> NAME, "=>", $ ATTR-> GET ($ THESTY), $ /; if ($ attr-> authz> = sınıf :: meta :: set $ attr-> Tip EQ 'string') {$ ATTR-> GET ($ Thingy, 'Hey orada!'); "Değişti:", $ ATTR-> GET ($ THESTY), $ /; }} Yazdır "nmetods: n"; $ Meth ($ Class-> yöntemlerim için) {"O", $ Meth-> Ad, $ /; $ Meth-> Call ($ Thingy); } Sınıf :: Meta, öznitelik veri türü doğrulama ile Perl sınıflarının oluşturulmasını otomatikleştirmek için bir arayüz sağlar. Tüm sınıflar için birleştirilmiş bir arayüz olarak kullanılabilecek bir içselleştirme API'sini içerir :: Meta tarafından oluşturulan sınıflar için birleşik bir arayüz olarak kullanılabilecek diğer modüllerden farklıdır. Bu anlamda, "cephe" tasarım modelinin bir uygulamasıdır. Gereksinimler: · Perl

Sınıf :: meta İlgili Yazılım