Livejournal
Log in
Post
Friends
My journal
caml_programmer
Erlang update
Aug 30, 2016 22:20
Erlang вариант переписали, стало гораздо лучше - 6.415 секунд.
(
Read more...
)
fp
Leave a comment
Comments 4
mtve
August 31 2016, 14:22:20 UTC
а если в перле добавить binmode F; binmode STDOUT; после open?
Reply
caml_programmer
August 31 2016, 21:18:35 UTC
binmode F я пробовал делать, сейчас проверил binmode F, binmode STDOUT - результат такой же (
...
)
Reply
mtve
September 1 2016, 11:23:29 UTC
а, понял, это не лечится.
можно только переписать через sysread/syswrite, как-то так:
#! /usr/bin/perl -w
open my ($f), "../data" or die;
while (sysread $f, my $buffer, 131072) {
syswrite STDOUT, $buffer or die;
}
Reply
caml_programmer
September 2 2016, 20:02:28 UTC
Такой пример не работает, немного переделал,
чтобы проверять количество байт, которые sysread
записал и стало быстро работать. Около 1.7 сек,
обновил результаты.
Reply
Leave a comment
Up
Comments 4
Reply
Reply
можно только переписать через sysread/syswrite, как-то так:
#! /usr/bin/perl -w
open my ($f), "../data" or die;
while (sysread $f, my $buffer, 131072) {
syswrite STDOUT, $buffer or die;
}
Reply
чтобы проверять количество байт, которые sysread
записал и стало быстро работать. Около 1.7 сек,
обновил результаты.
Reply
Leave a comment