Tento jednoduchý skript importuje pragmy striktné a varovania, ktoré pomáhajú zachytiť potenciálne chyby vo vašom kóde. Funkcia print vypíše reťazec "Ahoj, svet!" za ktorým nasleduje znak nového riadku.

Základná syntax

Syntax Perlu je navrhnutá tak, aby bola flexibilná a ľahko čitateľná. Tu je niekoľko kľúčových pojmov, ktoré vám pomôžu začať:

Premenné

Perl podporuje tri typy premenných: skaláre, polia a hash.

• Skaláry: skaláre obsahujú jednotlivé hodnoty, ako sú čísla alebo reťazce. Sú označené znakom dolára ($), za ktorým nasleduje názov premennej. Napríklad:

  číslo $ = 42;
  $string = "Ahoj, perl!";
  

• Polia: polia ukladajú usporiadané zoznamy hodnôt. Sú označené zavináčom (@), za ktorým nasleduje názov premennej. K jednotlivým prvkom je možné pristupovať pomocou ich indexu, ktorý začína od 0. Napríklad:

  @ovocie = ("jablko", "banán", "čerešňa");
  vytlačiť $ovocie[1]; # Výstupy „banán“
  

• Hashe: Hashe ukladajú neusporiadané kolekcie párov kľúč – hodnota. Sú označené znakom percenta (%), za ktorým nasleduje názov premennej. K hodnotám je možné pristupovať pomocou príslušných kláves. Napríklad:

  %osoba = ("meno" => "Alice", "vek" => 30);
  vytlač $osobu{"meno"}; # Výstupy "Alice"
  

Kontrolné štruktúry

Perl poskytuje niekoľko riadiacich štruktúr na riadenie toku vášho programu. Niektoré bežné zahŕňajú if, ak nie, for a pri.

• If/Else:
  $ skóre = 85; if ($score >= 90) { vytlačiť "A"; } elsif ($score >= 80) { tlač "B"; } inak { vytlačiť "C alebo nižšie"; }
• Pre slučku:
  @čísla = (1..10); foreach $num (@čísla) { vytlačiť "$num\n"; }
• Počas slučky:
  $počet = 0; while ($count < 5) { vytlač "$počet\n"; $pocet++; }

Pokročilé funkcie Perlu

Keď si osvojíte základy, môžete začať skúmať niektoré z pokročilejších funkcií perlu.

Regulárne výrazy

Perl je známy svojimi výkonnými schopnosťami regulárneho výrazu. Regulárne výrazy alebo regulárny výraz vám umožňujú vyhľadávať a manipulovať s reťazcami na základe vzorov. Tu je niekoľko príkladov:

• Zodpovedajúce vzory:
  $string = "Rýchla hnedá líška preskočí lenivého psa"; if ($string =~ /líška/) { print "Našla sa 'líška' v reťazci!"; }
• Striedanie:
  $string = "Ahoj, svet!"; $string =~ s/svet/perl/; vytlač $string; # Výstupy "Ahoj, perl!"
• Kvantifikátory:
  $string = "aaaaaaah"; if ($string =~ /a{6}/) { vytlačiť "Našlo sa šesť po sebe idúcich 'a!"; }

Moduly a CPAN

Comprehensive Perl Archive Network (CPAN) je úložisko viac ako 350 000 modulov, ktoré rozširujú funkčnosť perlu. Inštalácia a používanie týchto modulov vám môže ušetriť čas a námahu pri vývoji projektov. Tu je návod, ako nainštalovať modul pomocou cpan: