P
Size: a a a
2021 October 09
SZ
@PerlBanjoBot $ echo привет |perl -lne print+length
SZ
Make sense?
NK
даже больше разница, чем ожидал, но я уже исходник bytes посмотрел и понятно что он заведомо оптимальнее.
Планка отсечки у меня 10 мегабайт, а инкримент по килобайт 5, после которого очередная проверка.
Планка отсечки у меня 10 мегабайт, а инкримент по килобайт 5, после которого очередная проверка.
SZ
Почему бы просто не посмотреть, сколько оно занимает памяти?
SZ
Не, я правда не понимаю :(
SZ
Вариантов полно, хоть тот же devel peek
SZ
Или вот:
NK
sub import {
$^H |= $bytes::hint_bits;
}
sub unimport {
$^H &= ~$bytes::hint_bits;
}SZ
NK
и это вся магия. Очевидно это быстрее, чем любой другой вариант
SZ
Да нет же :)
NK
ну это наверное тоже, но это менее очевидно
SZ
Просто достать из pv длину -- это быстрее всего, она там уже есть
SZ
И это не аффектит ничего вокруг
SZ
В отличие от флагов
VV
Апгрейд даунгрейд это не затратно, потому что это флаг просто к скаляру. Так что если вы уверены в данных, то нужно просто взять длину в контексте use bytes. Уверен этой скорости достаточно. Можно ещё быстрее, конечно, но думаю это за рамками задач для перла, разве не так?
VV
Это хак, потому что это завтра может не работать как вы думаете, это не публичный интерфейс. Публичный это use / no bytes