Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Andrey Sapozhnikov                   2:5020/400     21 Mar 2002  20:29:14
 To : Artem Chuprina
 Subject : Re: вопрос
 -------------------------------------------------------------------------------- 
 
 Artem Chuprina wrote:
 
 > А если у тебя $a уже defined, то проверить ее на неравенство пустой
 > строке быстрее, чем вычислить длину.
 
 Длины скаляров в Перл (в отличие от, скажем, С) хранятся
 в самом скаляре (SV). Посему функция length в сущности
 ничего и не вычисляет:
 
 ---------------- test.pl ---------------------
 #!/usr/bin/perl -w
 use strict;
 use Benchmark;
 
 my $a = '';
 
 timethese 3000000, {
      'NE' => sub { $a ne '' },
      'LENGTH' => sub { length $a }
 };
 
 $a = 'x' x 100;
 
 timethese 3000000, {
      'NE' => sub { $a ne '' },
      'LENGTH' => sub { length $a }
 };
 --------------------- EOF --------------------
 
 Benchmark: timing 3000000 iterations of LENGTH, NE...
      LENGTH:  1 wallclock secs ( 0.45 usr +  0.00 sys =  0.45 CPU) @
 6666666.67/s (n=3000000)
          NE:  1 wallclock secs ( 0.87 usr + -0.01 sys =  0.86 CPU) @
 3488372.09/s (n=3000000)
 Benchmark: timing 3000000 iterations of LENGTH, NE...
      LENGTH:  1 wallclock secs ( 0.41 usr +  0.00 sys =  0.41 CPU) @
 7317073.17/s (n=3000000)
          NE:  1 wallclock secs ( 0.76 usr +  0.00 sys =  0.76 CPU) @
 3947368.42/s (n=3000000)
 Андрей
 
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 вопрос   Alexey Pchelnikov   21 Mar 2002 01:59:40 
 Re: вопрос   Andrey Sapozhnikov   21 Mar 2002 02:52:52 
 Re: вопрос   Alexey Pchelnikov   21 Mar 2002 21:24:49 
 Re: вопрос   Vladimir Podgorny   21 Mar 2002 14:26:43 
 Re: вопрос   Alexey Pchelnikov   21 Mar 2002 21:24:50 
 Re: вопрос   Artem Chuprina   21 Mar 2002 18:47:50 
 Re: вопрос   Andrey Sapozhnikov   21 Mar 2002 20:29:14 
 вопрос2   Alexey Pchelnikov   28 Mar 2002 23:52:06 
 вопрос2   Alan Long   29 Mar 2002 01:54:24 
 Re: вопрос2   Andrey Sapozhnikov   29 Mar 2002 02:54:19 
 Re: вопрос2   Alexey Pchelnikov   01 Apr 2002 00:11:16 
 Re: вопрос2   Artem Chuprina   01 Apr 2002 14:02:27 
 Re: вопрос2   Alexey Pchelnikov   01 Apr 2002 23:37:58 
Архивное /ru.perl/5284eae936c8.html, оценка 3 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional