Nesne :: Accessor Nesne :: Accessor, nesne erişimi başına oluşturmak için bir arayüz sağlayan bir perl modülüdür.
Şimdi İndirin

Nesne :: Accessor Sıralama ve Özet

Nesne :: Accessor Etiketler

Perl modülü perl > nesne aksesuarlar Nesne aksesuarları Sınıf aksesuarları

Nesne :: Accessor Açıklama

Nesne :: Accessor, nesne erişimi başına yaratmak için bir arayüz sağlayan bir perl modülüdür. Nesne :: Accessor, nesne erişimi başına oluşturmak için bir arayüz sağlayan bir arayüz sağlayan bir perl modülüdür (örneğin, sınıf :: Accessor'un sağladığı gibi, sınıf başına aksesuarların aksine). Kendi modülünüzdeki aksesuarlar veya bir nesneyi depolamak için veya bir nesneyi kendi nesnenizin içine saklamak ve aksesuarlara oradan erişmek için. Örnekler için özetsin. # nesneyi oluştur $ obj = nesne :: Accessor-> New (@List); # Accessors ile nesne oluştur $ obj = Nesne :: Accessor-> Yeni (% H); # Accessors # ile nesne oluşturun ve onların yardımcıları olacak $ Bool = $ obj-> MK_Accessors ('foo'); # Accessors'u oluştur $ bool = $ obj-> mk_accessors (# Giriş {Foo => Allow_Handler} ile Accessors oluşturun); # doğrulama $ klone = $ obj-> mk_clone; # veri olmadan orijinal # nesnesi klonu oluştur $ bool = $ obj-> mk_flush; # Tüm verileri temizleyin @list = $ obj-> ls_accessors; # bu nesne için tüm # aksesuarların bir listesini alır $ BAR = $ OBJ-> FOO ('Bar'); # 'Foo' 'ı' Bar '$ bar = $ obj-> foo (); # 'Bar' yine $ sub = $ obj-> Can ('foo'); # # 'Foo' Accessor $ Bar = $ Sub -> ('Bar') için Koderef Al. # 'foo' coderef $ bar = $ sub -> () ile ayarla; # Koderef ### tarafından 'Çubuğu'na' Çubuk'u Al. Nesneyi Temel Sınıf Paketi olarak kullanma :: sınıfım; Taban 'Nesneyi :: Accessor' kullanın; $ obj = benim :: class-> yeni; # Temel nesnesi oluştur $ bool = $ obj-> mk_accessors ('foo'); # Accessors, vb. Oluşturun ... ### Mevcut olmayan aksesuarlara erişimi olan tüm girişimi ölümcül ### (varsayılan olarak yanlış) $ nesne :: Accessor :: Fatal = 1; ### Hata ayıklamayı etkinleştirin Nesneyi :: Accessor :: debug = 1; ### Gelişmiş kullanım - geri çağrılar {$ obj = nesne :: Accessor-> Yeni ('foo'); $ obj-> register_callback (alt {...}); $ obj-> foo (1); # Bu aramalar, GET / SET # Davranışını ve arayana ne döneceğini değiştirmenizi sağlayan $ obj-> foo () # kayıt yaptığınız geri arama çağrısını çağırır. } ### Gelişmiş kullanım - lvalue öznitelikleri {$ obj = nesne :: Accessor :: lvalue-> Yeni ('foo'); $ obj-> foo = 1 yazdırın; # yazdırır 1} ### Gelişmiş kullanım - Kapsamlı öznitelik değerleri {$ obj = nesne :: Accessor-> New ('foo'); $ obj-> foo (1); $ obj-> foo yazdırmak; # 1 ###, 'foo' ### 'ı x' kapsamına 'nin kapsamını bağlayacaktır - $ x ### kapsamından çıktığında,' Foo'nun önceki değeri geri yüklenecektir { $ obj-> foo (2 => $ x benim); $ obj-> foo, '', $ x yazdırmak; # '22'} yazdıracak $ obj-> foo; # Yazdıracak 1} Gereksinimler: · Perl

Nesne :: Accessor İlgili Yazılım