Исходное сообщение
"Речь шла про 'оптимально'" Отправлено mic, 09-Дек-04 07:17
Где-то недавно видел статейку на английском про оптимизацию этого процесса. Щас уже не найду, но скриптик оттуда (переделанный слегка) вот: --------------------------------------------- #!/usr/bin/perl my $URI = "http://www.stonehenge.com/merlyn/" .     "Pictures/Trips/2003/03-06-PerlWhirlMacMania/" .     "Day-0-Pearl-Harbor/?show=14";   sub re_match {     my $str = $URI;     my ($scheme, $rest) = $str =~ /(.*?):(.*)/; $ir++;   }   sub split_it {     my $str = $URI;     my ($scheme, $rest) = split /:/, $str, 2; $is++;   }   sub index_substr {     my $str = $URI;     my $scheme = substr($str, 0, index($str, ":")-1);     my $rest = substr($str, index($str, ":")+1); $ii++;   } # Счетчик цикла $k=1000000; $tt = times; for ($i=0;$i<$k;$i++) { &re_match; } print "re_match = ",times - $tt," s.\n"; $tt = times; for ($i=0;$i<$k;$i++) { &split_it; } print "split_it = ",times - $tt," s.\n"; $tt = times; for ($i=0;$i<$k;$i++) {     &index_substr; } print "index_substr = ",times - $tt," s.\n"; ----------------------------------------------- Попробуйте запустить и наглядно увидите что "оптимально", а что не очень :)

Ваше сообщение
Имя*:
EMail:	Для отправки ответов на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:
	Введите код, изображенный на картинке: