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

> Perl (2) - Úvod do syntaxe

Perl Dnes si napíšeme několik nejjednodušších programů a ukážeme si pár dalších tipů.

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

Spouštění programu

Do prvního řádku každého perlovského programu se píše řetězec #!/usr/bin/perl. To proto, aby systém věděl, čím má program spouštět. Jakmile má shell zpracovat skript, pozná z prvního řádku, pro který interpret je tento skript určen. Po znacích #! následuje právě cesta k interpretu, který má být použit ke spuštění vámi napsaného programu.

Máme-li interpret jinde, tak je třeba změnit cestu za #! (ta se dá se zjistit příkazem whereis nebo env, případně i jinak - záleží na distribuci). Vhodnější bývá uvést #!/usr/bin/env perl, neboť takto je cesta k interpretu nalezena i v případě, kdy to je něco jiného než /usr/bin/perl

Takto zapsaný úvodní řádek tedy nepoužívá jen Perl, ale interpretované jazyky obecně. Píšeme-li například v Pythonu, budeme do prvního řádku psát #!/usr/bin/env python apod.

Je třeba podotknout, že takto napsaný první řádek program obsahovat nemusí. Jsou však důvody, proč je to vítané.

Normálně bychom spouštěli program takto:

$ perl program.pl

Ale, použijeme-li onen magický řádek, stačí, když napíšeme jen toto:

$ ./program.pl

Ještě předtím však musíme označit soubor jako spustitelný:

$ chmod 700 program.pl

Uživatele tak nemusí zajímat, v jakém jazyce je program napsaný. To je hlavní výhodou.

Důležité je to i proto, že když program s #!/usr/bin/env perl nahrajeme do adresáře /usr/bin (resp. libovolného adresáře z proměnné prostředí PATH) a potom z kteréhokoliv místa zadáme následující příkaz, náš program se spustí.

$ program.pl

Příklad na úvod

Nyní jsme připraveni na první příklad. Vytvořme nový soubor s názvem program.pl a v textovém editoru a do něj uložme tento kód:

#!/usr/bin/perl

print "Náš 1. program v Perlu!\n";

Už ze zápisu je celkem zřejmé, co bude program dělat. Jak jsme se v minulém dílu dozvěděli, je program posloupnost nějakých nařízení počítači. Přesně tak to platí i zde. Řádek print "Náš 1. program v Perlu!\n"; přeložený do naší řeči, znamená Vytiskni na výstup text Náš 1. program v Perlu! a nový řádek. print je příkaz, kterým dáváme počítači na vědomí, že chceme vypsat text, který napíšeme za print do uvozovek. Středník dává interpretu na vědomí, že zde příkaz končí a začíná nový. Středník musí být mezi každými dvěma příkazy. Výstup našeho prvního programu bude vypadat takto:

$ ./program.pl
Náš 1. program v Perlu!
$

Speciální znaky

Není to zatím nic jiného, než výpis textu. Zarazit může asi jediná věc - co znamená ta dvojice znaků \n. Je to označení ukončení řádku. Kdybychom tuto sekvenci znaků vynechali, dostali bychom opticky nepříliš hezký výstup:

$ ./program.pl
Náš 1. program v Perlu!$

\n je jednou z tzv. escape sekvencí. Escape sekvence (v tabulce je jejich částečný výčet) jednoduše řečeno nahrazují znaky, které nemůžeme v Perlu za daných okolností napsat (z různých důvodů: například mají nějaký jiný význam nebo pro ně nemáme symbol na klávesnici).

SymbolVýznam
\nnový řádek
\ttabulátor
\apípnutí systémového zvonku
\uaZnak a - ať je jakýkoliv - bude psán velkým písmenem
\laZnak a - ať je jakýkoliv - bude psán malým písmenem
\U...\EVše mezi escape sekvencemi \U a \E bude psané velkými písmeny
\L...\EVše mezi escape sekvencemi \L a \E bude psané malými písmeny
\\Zpětné lomítko
\"Uvozovka (používá se v řetězcích označených uvozovkami)
\'Apostrof (používá se v řetězcích označených apostrofy)

Proč je například takový znak pro nový řádek potřeba? Pokud ve zdrojovém kódu místo escape sekvenece \n jen odentrujeme, neuspějeme. Perl se k znaku nového řádku chovátak, že by ho interpretoval jako mezeru.

Poznamenejme, že Perl mimo data nedělá rozdíly mezi bílými znaky (mezera, tabulátor, znak nového řádku). Jakkoliv rozsáhlý program bychom v Perlu teoreticky mohli napsat na jediný řádek. Stačilo by konce řádků nahradit mezerami.

Zkusme si zaexperimentovat a v našem příkladu si do uvozovek za print přidejme nějakou další escape sekvenci - například \a a sledujme (v tomto případě poslouchejme - tedy pokud nemáme nastaven vizuální zvonek), co se stane.

Přípona perlovského programu

Programům dáváme vždy příponu .pl. Není povinná (systém typ programu stejně vždy určuje podle řádku #!/cesta/k/interpretu), ale pro přehlednost je dobrým zvykem ji používat. Později budeme používat také příponu .pm pro moduly. Pro programy v Perlu 6 se používá například .pl6, .p6, .pm6 atd.

Komentáře

Komentáře jsou úseky programu, které interpret ignoruje. Na výsledný program nemají žádný efekt. K čemu jsou tedy dobré? Zvyšují přehlednost zdrojového kódu a jsou velmi užitečné v případě, kdy chceme kód po delší době editovat. Obzvlášť, jedná-li se o složitější program. Uvozují se křížkem - od něj do konce řádku interpret vše ignoruje. Uveďme příklad:

#!/usr/bin/env perl
#########################################
# Autor:   Jiří Václavík                #
# Verze:   20050204                     #
# Název:   program.pl                   #
# Činnost: Vypisuje text                #
#########################################

print "Náš už druhý program v Perlu. S komentáři!\n";#Další komentář

#A ještě jeden

Jak používat komentáře? Měli by usnadňovat pochopení programu při čtení jeho zdrojového kódu. Nesprávně napsaný komentář je na obtíž (Typickou ukázkou nevhodných komentářů je výše uvedený program - zatím však nemáme znalosti pro program, kde by komentáře byly potřeba. Dostaneme se k tomu.)

Další možností, jak použít komentář je informace o názvu, verzi, autorovi a činnosti popř. něčeho dalšího na začátku rozsáhlejšího programu. Komentáře píšeme pro to, aby usnadňovaly pochopení. Je třeba psát proč je ta a ta část programu napsaná takto a ne jinak, jaký význam zde má tato proměnná, co tu bude potřeba dodělat nebo něco, co zkrátka bude při pozdějším čtení kódu k užitku. Komentář typu #vypisuje text Ahoj za příkazem print "Ahoj"; nám asi moc nepomůže. Ovšem setkat se s ním lze poměrně často, zejména v případech, kdy autor zkrátka komentář napsat chce. Nejlépší metoda, která člověka naučí psát komentáře, je vlastního čtení.

Perl nepodporuje víceřádkové komentáře. Existuje sice speciální syntaxe, která by k tomu teoreticky mohla sloužit, ale není vhodné ji používat, protože je určena k jiným účelům. Řetězec =komentar označuje začátek takového bloku a jeho konec označíme =cut.

#!/usr/bin/perl

print "Text před\n";

=komentar
Víceřádkový
"komentář"
Na toto se podívejte a zase na to zapomeňte
=cut
print "Text za\n";

Verze pro tisk

pridej.cz

 

DISKUZE

vizualni zvonek 15.2.2005 20:24 oron
L Re: vizualni zvonek 15.2.2005 20:58 Jiří Václavík
  |- Re: vizualni zvonek 15.2.2005 21:04 Ondřej Čečák
  L Re: vizualni zvonek 4.3.2005 12:08 Jiří Václavík
Když to srovnám se seriálem o Pythonu 15.2.2005 21:38 Petr Zajíc
  L Re: Když to srovnám se seriálem o Pythonu 15.2.2005 23:28 Jiří Václavík
    L Re: Když to srovnám se seriálem o Pythonu 17.2.2005 10:29 Hynek (Pichi) Vychodil
      |- Re: Když to srovnám se seriálem o Pythonu 17.2.2005 12:40 Petr Zajíc
      | L Re: Když to srovnám se seriálem o Pythonu 17.2.2005 15:34 Hynek (Pichi) Vychodil
      L Re: Když to srovnám se seriálem o Pythonu 17.2.2005 14:11 Jiří Václavík




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

28.11.2018 23:56 /František Kučera

Prosincový sraz spolku OpenAlt se koná ve středu 5.12.2018 od 16:00 na adrese Zikova 1903/4, Praha 6. Tentokrát navštívíme organizaci CESNET. Na programu jsou dvě přednášky: Distribuované úložiště Ceph (Michal Strnad) a Plně šifrovaný disk na moderním systému (Ondřej Caletka). Následně se přesuneme do některé z nedalekých restaurací, kde budeme pokračovat v diskusi.


Komentářů: 1

12.11.2018 21:28 /Redakce Linuxsoft.cz
22. listopadu 2018 se koná v Praze na Karlově náměstí již pátý ročník konference s tématem Datová centra pro business, která nabídne odpovědi na aktuální a často řešené otázky: Jaké jsou aktuální trendy v oblasti datových center a jak je optimálně využít pro vlastní prospěch? Jak si zajistit odpovídající služby datových center? Podle jakých kritérií vybírat dodavatele služeb? Jak volit vhodné součásti infrastruktury při budování či rozšiřování vlastního datového centra? Jak efektivně datové centrum spravovat? Jak co nejlépe eliminovat možná rizika? apod. Příznivci LinuxSoftu mohou při registraci uplatnit kód LIN350, který jim přinese zvýhodněné vstupné s 50% slevou.
Přidat komentář

6.11.2018 2:04 /František Kučera
Říjnový pražský sraz spolku OpenAlt se koná v listopadu – již tento čtvrtek – 8. 11. 2018 od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Tentokrát bez oficiální přednášky, ale zato s dobrým jídlem a pivem – volná diskuse na téma umění a technologie, IoT, CNC, svobodný software, hardware a další hračky.
Přidat komentář

4.10.2018 21:30 /Ondřej Čečák
LinuxDays 2018 již tento víkend, registrace je otevřená.
Přidat komentář

18.9.2018 23:30 /František Kučera
Zářijový pražský sraz spolku OpenAlt se koná již tento čtvrtek – 20. 9. 2018 od 18:00 v Radegastovně Perón (Stroupežnického 20, Praha 5). Tentokrát bez oficiální přednášky, ale zato s dobrým jídlem a pivem – volná diskuse na téma IoT, CNC, svobodný software, hardware a další hračky.
Přidat komentář

9.9.2018 14:15 /Redakce Linuxsoft.cz
20.9.2018 proběhne v pražském Kongresovém centru Vavruška konference Mobilní řešení pro business. Návštěvníci si vyslechnou mimo jiné přednášky na témata: Nejdůležitější aktuální trendy v oblasti mobilních technologií, správa a zabezpečení mobilních zařízení ve firmách, jak mobilně přistupovat k informačnímu systému firmy, kdy se vyplatí používat odolná mobilní zařízení nebo jak zabezpečit mobilní komunikaci.
Přidat komentář

12.8.2018 16:58 /František Kučera
Srpnový pražský sraz spolku OpenAlt se koná ve čtvrtek – 16. 8. 2018 od 19:00 v Kavárně Ideál (Sázavská 30, Praha), kde máme rezervovaný salonek. Tentokrát jsou tématem srazu databáze prezentaci svého projektu si pro nás připravil Standa Dzik. Dále bude prostor, abychom probrali nápady na využití IoT a sítě The Things Network, případně další témata.
Přidat komentář

16.7.2018 1:05 /František Kučera
Červencový pražský sraz spolku OpenAlt se koná již tento čtvrtek – 19. 7. 2018 od 18:00 v Kavárně Ideál (Sázavská 30, Praha), kde máme rezervovaný salonek. Tentokrát bude přednáška na téma: automatizační nástroj Ansible, kterou si připravil Martin Vicián.
Přidat komentář

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

> Poslední diskuze

2.12.2018 23:56 / František Kučera
Sraz

5.10.2018 17:12 / Jakub Kuljovsky
Re: Jaký kurz a software by jste doporučili pro začínajcího kodéra?

20.9.2018 10:04 / Jan Ober
Jaký kurz a software by jste doporučili pro začínajcího kodéra?

20.9.2018 10:00 / Jan Ober
Re: Gimp

20.2.2018 18:48 / Ivan Majer
portal

Více ...

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