Perl

De la Wikipedia, enciclopedia liberă

Perl este un limbaj de programare dinamic, procedural creat de Lary Wall în 1987. Perl împrumută caracteristicile limbajelor C, shell, AWK, sed, Lisp şi ale multor alte limbaje într-o masură mai mică.

Cuprins

1 Rezumat :
2 Structura Limbajului
3 Compararea performantelor
4 Opinii
- 4.1 Pro
- 4.2 Contra
5 Hiperlegături

[modifică] Rezumat :

Manualul perlintro(1) susţine:

Perl este un limbaj de programare general iniţial dezvoltat pentru manipularea de text şi în prezent folosit pentru o gamă largă de aplicaţii inclusiv administrarea de sisteme, dezvoltare web, aplicaţii de retea, interfeţe grafice şi altele.

Limbajul intenţionează să fie mai degrabă practic ( usor de folosit, eficient, complet ) decât frumos ( mic, elegant, minim). Caracteristicile principale sunt usurinţa de utilizare, suport pentru programare procedurală şi obiectuală, are integrat un puternic suport pentru procesarea de text şi o colecţie mare de module provenite de la terţi.

[modifică] Design

Design-ul Perl poate fi înţeles ca un răspuns la trei mari tendinţe în industria calculatoarelor: scăderea preţurilor la hardware, creşterea costurilor de dezvoltare, îmbunătăţiri în tehnologia compilatoarelor. Multe limbaje aparute înainte, cum ar fi Fortran sau C au fost concepute pentru a utiliza eficient resursele hardware scumpe la momentul respectiv. Spre deosebire de acestea Perl a fost conceput pentru a utiliza eficient timpul scump al programatorului.

Perl are multe caracteristici care uşurează sarcina programatorului cu preţul unei mai mari utilizări a procesorului şi a memoriei. Acestea includ managementul automat al memoriei, tipuri dinamice, şiruri, liste, expresii regulate şi o functie eval()

[modifică] Caracteristici

[modifică] Aplicaţii

[modifică] Implementare

[modifică] Disponibilitate

[modifică] Structura Limbajului

[modifică] Program exemplu

#!/usr/bin/perl
print "Hello, world!\n";

[modifică] Tipuri de date

Scalari

$a = 12;
$b = 'foo';
$c = 3.14324324234;

Liste
- anonime

('a','foo',123)

- array

@array = ( 'a', 'foo',123);
 @array = qw/a foo 123/;

Hash

%hash = (
  foo => 'bar' ,
  tar => 123 , 
)

În cazul hash-urilor cheile sunt unice.!

[modifică] Structuri de control

[modifică] Subrutine

Se declara cu

sub _numele_subrutinei_ {
 # code here
}

Se apeleaza cu

_numele_subrutinei_( _parametri_ );

În subrutina parametrii se regasesc in @_

Exemplu

#!/usr/bin/perl

use strict;
use warnings;

display('foo');

sub display {
    my $message = shift; 
      # shift se face implicit pe @_
      # o alta metoda e: my ($message) = @_
   print $message;
}

Observatie: nu e obligatoriu ca subrutina să fie definită inaintea apelului acesteia (ca în cazul C-ului de exemplul)

[modifică] Interfete pentru baze de date

DBI

use DBI;

my $dbh = DBI->connect($data_source, $username, $auth, \%attr); // conectarea la o baza de date
my $query = $dbh->do("query");
// sau
my $query = $dbh->prepare("query");
$query->execute($argumente);