Всем привет
подскажите кто-нибудь, куда копать
Иногда подвисают процессы скрипта при загрузке файла на удалённый сервер. Скрипт написан на Perl, загружаются с помощью
LWP. Когда подвисают начинают дико жрать проц и в выводе strace'a вот что:
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
select(8, [7], [7], NULL, {180, 0}) = 1 (in [7], left {179, 999999})
происходит это не всегда.