[Recent Entries][Archive][Friends][User Info]
| May 12th, 2011 | |
|---|---|
| 03:22 pm [Link] |     В целях мозгоебства решил проверить, какое условие работает быстрее в perl. Сначала просто замерял время между вызовами и делал разницу, но тут же понял, что не те масштабы. Попробовал через Time::HiRes вывести разницу , но тоже ничего вменяемого, при трех тестах, каждый последующий быстрее чем предыдущий (вне зависимости от алгоритма). Потом попробовал через модуль Benchmark померить, несколко тысяч итераций тоже ни к чему внятному не привели :)) отличие в 1%, а то и вовсе 0%.. неужели компилятору похуй)) Суть теста. Есть некоторая функция loging и ее надо вызывать когда $log=1, накатал четыре классических варианта вызова.. Все одинаковые по производительности? )) ($log)?&loging('Application started'):'';&loging('Application started') if ($log)if ($log) {&loging('Application started')}($log)&&(&loging('Application started'))
Rate a d b c
a 1727/s -- -1% -1% -1%
d 1742/s 1% -- -0% -1%
b 1745/s 1% 0% -- -0%
c 1751/s 1% 1% 0% --
|
| Comments | |