Regarding me

‘use strict‘.

Are 2 aspecte:

1. Perl permite unui program crearea automata a variabilelor, in orice loc din program, fara a fi nevoie ca acestea sa fie declarate inainte. Aceasta facilitate foarte comoda pentru programator, este in acelasi timp o incredibila sursa de bug-uri intr-o aplicatie. Atunci cand folositi ‘use strict’ Perl va genera erori de fiecare data cand o variabila este folosita fara a fi declarata inainte.

Bad code:

       $i = int rand(100);

        print $i;

Good code:

       my $i;

        $i = int rand(100);
        print $i;

2. Pentru ca Perl ofera mai multe moduri in care se poate realiza ceva, deseori incearca sa determine din context ce anume a vrut programatorul sa faca. Cateodata reuseste, alteori nu.

Exemplu:

      $a = test_value;
       print "Value: ", $a, "\n";
       sub test_value { return "test passed"; }

In exemplul de mai sus, Perl va initializa variabila $a cu sirul de caractere test_value, nu cu rezultatul intors de functia test_value(), pentru ca:

• test_value nu este marcat corespunzator ca fiind apel de metoda, folosind ()
• la momentul interpretarii primei linii, Perl inca nu “stie” ca exista o metoda numita test_value();

Varianta corecta:

       use strict;

       sub test_value; #Se declara functia ce va fi definita mai tarziu
        my $a = test_value();
        print "Value: ", $a, "\n";
        sub test_value { return "test_passed"; }

Inspiratie: de aici.

Incepand de astazi, o sa pun, in functie de timp, un serial de tips & tricks pentru perl in care am de gand sa povestesc lucruri utile, scurte si la obiect. Tutorialul este pentru persoane care au avut deja contact cu perl si l-au folosit macar pentru a scrie cateva scripturi. Azi, partea 1:

Bad:

 #!/usr/bin/perl

  print "Hello world";

Good:

 #!/usr/bin/perl

  use warnings;
  print "Hello world";

Implicit, interpretorul de perl pleaca de la premisa ca programatorul stie ce scrie/face si prin urmare ii ofera destul de multe libertati. ‘use warnings’ activeaza o serie de verificari ce au ca scop reducerea bug-urilor generate de folosirea incorecta a limbajului.

Exemplu:

 use warnings;

  $filename = "./logfile.txt";
  open (LOG, $fn);
  print LOG "Test\n";
  close LOGFILE;

Fara ‘use warnings’, codul de mai sus ar fi rulat de interpretorul de perl care nu ar semnala nici un fel de eroare, insa nu ar functiona deloc. Adaugand ‘use warnings’, perl ne semnaleaza:

1. variabila $filename este initializata si nu mai este folosita;
2. handler-ul LOGFILE este folosit doar o data, la apelul lui close;
3. variabila $fn este folosita fara a fi initializata;
4. functia print() incearca sa scrie intr-un fisier ce nu a fost deschis;

Intotdeauna folositi ‘use warnings’ !

Inspiratie de aici.