Perl

Perl (pagal idėją tai ne santrumpa, o tiesiog pavadinimas, tačiau vėliau buvo pasiūlyti ir santrumpą atitinkantyis pavadinimai, tokie kaip: Practical Extraction and Report Language ar Pathologically Eclectic Rubbish Lister) pirmąją versiją sukūrė ir 1987 gruodžio 18 dieną išleido Larry Wall. Ši kalba paveldėjo labai daug kitų programavimo kalbų savybių.

Istorija

Perl kalba buvo pradėta kurti tekstinių failų apdorojimui, lengvam reikalingos informacijos paėmimui ir vizualiam pateikimui, kaip įrankis, galintis pilniau ir patogiau atlikti sh, awk, sed ir kitų UNIX įrankių darbus. Vėliau išsivystė į pilnateisę bendros paskirties programavimo kalbą su išvystytomis teksto ir masyvų apdorojimo galimybėmis. Kalba yra labai praktiška – lengva naudoti, efektyvi, kompaktiška. Perl perėmė daugelį savybių iš tokių programavimo kalbų kaip C, sed, awk ir sh. Sintaksė primena C kalbos sintaksę, tačiau nėra griežtai apibrėžta, (ypač – iki 4-osios versijos).

1993 metais Perl programavimo kalba buvo perrašyta iš naujo ir nuo 5 versijos atsirado tokios galimybės:

• moduliškumas, galimybė daug kartų panaudoti tą patį modulį;
• objektiškai orientuotas programavimas;
• gijų (thread) palaikymas;
• unikodo palaikymas, daugiakalbiškumas;

ir kt.

Praktinis naudojimas

Perl visados įrašoma į visas Linux ir BSD distribucijas kaip standartinė skriptinimo kalba administravimo užduotis spręsti. Naudojama tuo atveju jei Bash galimybių nepakanka.

Perl kalba parašytas vienas iš populiaresnių žaidimų Frozen Bubble.

Perl kalba buvo parašyta didžioji dalis pirmųjų dinaminių interneto svetainių kodo, kai dinaminiam turiniui kurti populiariausia buvo CGI technologija. Vėliau šios pozicijos buvo užleistos labiau specializuotai PHP. Nors ir dabar net tokie puslapiai kaip lrytas.lt naudoja Perl.

Perl (Perlscript), panašiai kaip ir Javascript, galima panaudoti skriptų rašymui, kurie interpretuojami vartotojo naršyklėje.

Perl plačiai naudojama IT saugumo problemoms spręsti. Tai saugumo spragų išnaudojimo skriptams (eksploitams) rašyti.

BioPerl modulis plačiai naudojamas bioinformatikoje.

Pavyzdžiai

Paprasta Perl programa „Sveikas pasauli!“:

#!/usr/bin/perl
print "Sveikas, Pasauli!\n";

Dviejų įvestų skaičių sudėtis:

#!/usr/bin/perl
$x = <STDIN>;
$y = <STDIN>;
$z = $x + $y;
print $z;

Darbas su masyvais:

#!/usr/bin/perl
$x = 0;
print "Įvesk kelis žožius\n";
while ($x < 3) {
$zodziai[$x] = <STDIN>;
$x++;
}
print "Ivedei: @zodziai";

If - else panaudojimas kartu su reguliariomis išraiškomis:

use Carp;
my $inputas = "../etc/passwd";
 
if ($inputas =~ /\.\.\//g) {
    croak "Kažkas puola /etc/passwd failą!";
} else {
    print "Jūs neturite šito matyti.\n";
}

Nuorodos

Taip pat skaitykite

• Interpretatorius
• Programavimo kalbos

Kiti šaltiniai

• Lietuvos Perl programavimo kalbos bendruomenės internetinis puslapis
• perl.org apie Perl
• www.perldoc.com
• Oreilly knygos