LINUXSOFT.cz Přeskoč levou lištu
Uživatel: Heslo:  
   CZUKPL

> Perl (63) - OOP - závěr

Perl Dnešní díl zakončí sérii článků o objektově orientovaném programování. Podíváme se na to, co se nevešlo do předchozích pěti dílů.

25.9.2007 15:00 | Jiří Václavík | Články autora | přečteno 10428×

Dnes se rozloučíme s objektově orientovaným programováním tím, že probereme některé dosud nezmíněné aspekty. Ovšem nebude to rozlučka dlouhá, neboť od příštího dílu si uvedeme několikadílný (a objektový) rozsáhlejší příklad.

Přímý přístup uživatele modulu do objektu

Perl narozdíl od některých jiných jazyků umožňuje přistupovat k atributům třídy z programu i bez přístupové metody.

$o = Trida->new();
print $o->{"atribut"};
$o->{"atribut"} = "nova hodnota";

Tento způsob přístupu k atributům bychom za žádných okolností neměli používat, neboť to jde proti myšlence objektově orientovaného programování.

Proč je to tedy tak nebezpečné? Vnitřní strukturu objektu by uživatel modulu teoreticky vůbec neměl znát, resp. měl by s ním zacházet tak, že ji nezná. Implementace modulu včetně složení a vůbec existence atributů zkrátka není jeho věc. Pro práci s objektem tady je rozhraní, které by mělo být jedinou možností, jak s objektem komunikovat. V opačném případě půjde o narušení zapouzdření.

Toto je důvod, proč přímo k datům modulu nepřistupovat. Může mít velmi nepříjemné důsledky. Uveďme si ty nejčastější.

  • K zajištění konzistence dat jde nezřídka ruku v ruce s změnou atributu vyvolání nějaké jiné akce. Typicky může jít o zápis do databáze. Pokud bychom přistupovali k atributu přímo, pak se může stát, že tato akce provedena nebude.
  • Dále je také možné, že v atributech je ukládáno něco jiného, než co chceme zapisovat nebo je to ukládáno v jiné formě. To se může občas stát například u uchovávání různých veličin. Vezměme si metodu nastav_rychlost(36), kde 36 je hodnota v km/h. Ale co když je v objektu uchovávána hodnota v m/s, tedy 10?
  • Pokud není modul který používáme zrovna mrtvý, může se stát, že se v příští verzi modulu změní jména atributů nebo celá struktura hashe. Potom je nutné přepsat nejen modul, ale i programy, které přistupují k jeho atributům přímo. V případě respektování myšlenky OOP k tomu však nedojde

Závěrem lze říci, že přístup k atributům dobře napsaného objektu by nikdy nemělo dojít. U těch atributů, kde to má smysl totiž vždy bude existovat nějaká metoda typu dej_atribut nebo zmen_atribut, které potřebné operace zajistí.

Soukromí

Soukromí modulu je množina dat, ke kterým uživatel modulu nemá přístup. Jiné jazyky jako C++ umožňují explicitně označit vybraná data jako soukromá - tedy neposkytnout je uživateli.

Smysl toho všeho lépe pochopíme na následujícím příkladu. Modul, který bude poskytovat uživateli služby s manipulaci s databází si bude uvnitř definovat funkci is_in_array. Ta dělá pouze pomocnou činnost, která nemá co dělat v sadě nástrojů pro práci s databází. Proto autor modulu označí funkci jako soukromou.

Perl toto neumožňuje. Všechna data, která jsou dostupná v tabulce symbolů, může uživatel získat. Nerozlišují se soukromá a veřejná data.

Na tomto místě je ale třeba říci, že zvykem dobře vychovaného uživatele je nepoužívat metody, které nejsou zmíněny v dokumentaci. Důvody jsou podobné jako důvody proti přístupu k atributům. Je to tedy hlavně v jeho zájmu.

Jak bylo řečeno, Perl nepodporuje soukromá data. Pokud však opravdu trváme na tom, aby uživatel neměl vůbec žádnou možnost zasáhnout do vybraných dat, lze to zařídit jednoduše tak, že dotyčné metody nebudou dostupné v tabulce symbolů. Jinými slovy, je třeba tyto metody definovat v lexikálním prostoru. Podívejme se stručně jak na to.

my $soukroma_metoda = sub {
    ...
}

Z jiných metod pak soukromou metodu voláme takto.

&$soukroma_metoda(parametry);

Alternativní syntaxe pro OOP

Někteří programátoři možná ocení další způsob zápisu, kterým lze pracovat s objekty.

$objekt = new Trida(parametry_konstruktoru);
metoda $objekt parametr1, parametr2, ..., parametrn;

Stanovení dědičnosti pomocí pragmy base

Pomocí base lze následujícím příkazem zajistit, že bude provedeno zavedení modulů předků v době kompilace.

use base qw(Trida);

Pro srovnání se podívejme na zápis, který ve výsledku udělá totéž.

BEGIN {
    require Trida;
    our @ISA;
    @ISA = qw(Trida);
}

Objekt jako odkaz na skalár

Již jsme si ukázali objekt jako odkaz na hash, v minulém dílu i jako odkaz na pole, tak si uveďme ještě třetí variantu. Ta se používá když uchováváme jedinou položku. Tedy v našem případě regulární výraz, nad kterým můžeme provádět různé testy.

package TestRegex;

sub new {
    my($pkg, $regex) = @_;
    bless \$regex, $pkg;
}
sub test_rychlosti {...} sub navrh_optimalizace {...}

Metoda AUTOLOAD

Připomeňme, že pokud není nalezena volaná metoda, automaticky se místo ní zavolá metoda AUTOLOAD.

sub AUTOLOAD {
    return if $AUTOLOAD =~ /::DESTROY/;
    print "Metoda $AUTOLOAD neni dostupna\n";
}

Další zdroje

Na internetu jsou o objektově orientovaném programování popsány gigabajty. Uveďme jen několik odkazů, kde hledat další informace na toto téma.

Téměř vše potřebné je k dispozici na manuálových stránkách. perlobj(1) se zabývá syntaxí, v perlbot(1) jsou některé triky a příklady, perltoot(1) a perltooc(1) jsou pak tutoriály. Kvalitním zdrojem je také tradičně Wikipedie, kde jsou uvedeny další odkazy.

Ovšem ani v tomto seriálu objektově orientované programování nekončí. Od příštího dílu po několik dalších začneme psát větší program, jehož hlavní součástí bude objektově orientovaný modul.

Verze pro tisk

pridej.cz

 

DISKUZE

privatni data u objektu 3.10.2007 16:54 Roman Vašíček




Příspívat do diskuze mohou pouze registrovaní uživatelé.
> Vyhledávání software
> Vyhledávání článků

13.2.2018 0:41 /František Kučera
Únorový pražský sraz OpenAltu se koná 15. 2. 2018 a tentokrát se vydáme na návštěvu do jednoho pražského datacentra. Sejdeme se v 17:50 v severovýchodní části nástupiště tramvajové zastávky Koh-I-Noor. Po exkurzi se přesuneme do restaurace U Pštrosa (Moskevská 49), kde probereme tradiční témata (svobodný software a hardware, DIY, CNC, SDR, 3D tisk…) a tentokrát bude k vidění i IoT brána od The Things Network.
Přidat komentář

11.2.2018 23:11 /Petr Ježek
Hledáte lehký a rychlý prolížeč PDF souborů? Pokud vás již omrzelo čekat na načítání stránek či jiné nešvary, zkuste xreader.
Přidat komentář

11.2.2018 20:35 /Redakce Linuxsoft.cz
Třetí ročník odborné IT konference na téma Cloud computing v praxi proběhne ve čtvrtek 1. března 2018 v konferenčním centru Vavruška, v paláci Charitas, Karlovo náměstí 5, Praha 2 (u metra Karlovo náměstí) od 9:00 hod. dopoledne do cca 16 hod. odpoledne. Konference o trendech v oblasti cloud computingu nabídne i informace o konkrétních možnostech využívání cloudů a řešení vybraných otázek souvisejících s provozem IT infrastruktury.
Přidat komentář

15.1.2018 0:51 /František Kučera
První letošní pražský sraz se koná již tento čtvrtek 18. ledna od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Vítáni jsou všichni příznivci svobodného softwaru a hardwaru, ESP32, DIY, CNC, SDR nebo dobrého piva. Prvních deset účastníků srazu obdrží samolepku There Is No Cloud… just other people's computers. od Free Software Foundation.
Přidat komentář

14.11.2017 16:56 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Zajímá tě DIY, CNC, SDR nebo morseovka? Přijď na sraz spolku OpenAlt – tradičně první čtvrtek před třetím pátkem v měsíci: 16. listopadu od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5).
Přidat komentář

12.11.2017 11:06 /Redakce Linuxsoft.cz
PR: 4. ročník odborné IT konference na téma Datová centra pro business proběhne již ve čtvrtek 23. listopadu 2017 v konferenčním centru Vavruška, v paláci Charitas, Karlovo náměstí 5, Praha 2 (u metra Karlovo náměstí) od 9:00. Konference o návrhu, budování, správě a efektivním využívání datových center nabídne odpovědi na aktuální a často řešené otázky, např Jaké jsou aktuální trendy v oblasti datových center a jak je využít pro vlastní prospěch? Jak zajistit pro firmu či jinou organizaci odpovídající služby datových center? Podle jakých kritérií vybrat dodavatele služeb? Jak volit součásti infrastruktury při budování či rozšiřování vlastního datového centra? Jak efektivně spravovat datové centrum? Jak eliminovat možná rizika? apod.
Přidat komentář

13.9.2017 8:00 /František Kučera
Máš rád svobodný software a hardware nebo se o nich chceš něco dozvědět? Zajímá tě DIY, CNC, SDR nebo morseovka? Přijď na sraz spolku OpenAlt – tentokrát netradičně v pondělí: 18. září od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5).
Přidat komentář

3.9.2017 20:45 /Redakce Linuxsoft.cz
PR: Dne 21. září 2017 proběhne v Praze konference "Mobilní řešení pro business". Hlavní tématy konference budou: nejnovější trendy v oblasti mobilních řešení pro firmy, efektivní využití mobilních zařízení, bezpečnostní rizika a řešení pro jejich omezení, správa mobilních zařízení ve firmách a další.
Přidat komentář

   Více ...   Přidat zprávičku

> Poslední diskuze

20.2.2018 18:48 / Ivan Majer
portal

20.2.2018 15:57 / Jan Havel
Jak využíváte služby cloudu v podnikání?

16.1.2018 1:08 / Ivan Pittner
verejna ip od o2 ubuntu

15.1.2018 17:26 / Mira Harvalik
Re: Jak udělat HTML/Javascript swiping gallery do mobilu?

30.12.2017 20:16 / Michal Knoll
odmocnina

Více ...

ISSN 1801-3805 | Provozovatel: Pavel Kysilka, IČ: 72868490 (2003-2018) | mail at linuxsoft dot cz | Design: www.megadesign.cz | Textová verze