Perl. Mistrzostwo w programowaniu

Mierzenie czasu

Aby zmierzyć czas wykonywania programu, mogę po prostu spojrzeć na zegar, kiedy uruchamiam program, po czym spojrzeć drugi raz, kiedy program zakończy działanie. Jest to sposób najprostszy i najbardziej naiwny, ale w skrajnych okolicznościach bywa skuteczny. Jeśli mogę zredukować czas działania z całego dnia do kilku minut, to nie dbam o to, że patrzenie na zegar jest nieco niedokładne.

Nie muszę jednak przyglądać się zegarowi. Mogę bezpośrednio zmierzyć czas wykonania programu:

#!/usr/bin/perl

my $start = time;

# ... właściwa treść programu

my $end   = time;

print "Łączny czas wyniósł ", $end - $start;

W przypadku krótko wykonującego się programu metoda ta mierzy tylko część czasu wykonania. Co z czasem, który Perl poświęcił na ...