flow-tools+flowscan+cflowd

[Max Yurchak]

Проблемка значит в следующем. Решил значит настроить у себя такую связочку flow-tools+flowscan+cflowd. Почитал настроил, вроде бы начало собирать статистику но только с небольшой проблемкой.
Когда я запускаю
#/usr/local/var/db/flows/bin/flowscan
получается вот такое сообщение:
2007/07/09 18:33:58 working on file /var/db/flows/2007/2007-07/2007-07-09/ft-v05.2007-07-09.182026+0400...
2007/07/09 18:33:58 flowscan-1.020 CUFlow: Cflow::find took 0 wallclock secs ( 0.02 usr + 0.03 sys = 0.05 CPU) for 11879 flow file bytes, flow hit ratio: 334/870
2007/07/09 18:33:58 flowscan-1.020 CUFlow: report took 0 wallclock secs ( 0.00 usr 0.01 sys + 0.00 cusr 0.04 csys = 0.05 CPU)
sleep 300...
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Use of uninitialized value in numeric gt (>) at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Table.pm line 1732.
Что за проблемка ни кто не может подсказать?
Строка 1732 указанного файла:
$self->{last_col} = $count if ($count > $self->{last_col});
И соответственно контекст:
#-------------------------------------------------------
# Subroutine: addRow("cell 1 content" [, "cell 2 content", ...])
# Author: Stacy Lacy
# Date: 30 Jul 1997
# Modified: 23 Oct 2003 - Anthony Peacock (Version 2 new data structure)
#-------------------------------------------------------
sub addRow {
my $self = shift;

# this sub should add a row, using @_ as contents
my $count = @_;
# if number of cells is greater than cols, let's assume
# we want to add a column.
$self->{last_col} = $count if ($count > $self->{last_col});
$self->{last_row}++; # increment number of rows
for (my $i = 1; $i <= $count; $i++) {
# Store each value in cell on row
$self->{rows}[$self->{last_row}]->{cells}[$i]->{contents} = shift;
}
return $self->{last_row};

}
Система
FreeBSD 6.1-RELEASE FreeBSD 6.1-RELEASE
Заранее спасибо!

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[Alex Keda]

хрен поймёшь, где твой текст, где листинги...
кнопочка code - просто так сделана?
=========
по теме - если правильно помню, у тебя по какой-то причине происходит сравнение с пустой строкой...

[Max Yurchak]

И как же с этим бороться? Что то инет покурил, ничего не нашёл, все инструкции уже по перечитал! [/code]

[Alex Keda]

отлаживать.