PERL: Tips & Tricks i ogólnie o czym warto pamiętać

  • Usuwanie elementu z listy, tablicy
    @list = grep(!/$refid/,@list);

    Doświadczenie pokazuje, że nawet w ciasnej pętli jest to duuuża optymalizacja.

  • Wielopoziomowa tablica hasująca
    %hash->{$2} = ()     unless ( %hash->{$2} );
    %hash->{$2}->{$1} = () unless ( %hash->{$2}->{$1} );
    %hash->{$2}->{$1}->{$klucz}       = $wartosc;
  • drukowanie w kolumnach
    printf OUT “\t%-9d\t%-12d\n”, $zmiennaA, $zmiennaB;

About this entry