Ticket #2051

[kazuo]

The error did not occur.
Thank you.

[kazuo]

Did you change revision contents?
A message is given.

-----------------
Cron <root@XXX> /var/www/ispcp/engine/quota/ispcp-dsk-quota &>/var/log/ispcp/ispcp-dsk-quota.log

Use of uninitialized value in pattern match (m//) at /var/www/ispcp/engine/quota/ispcp-dsk-quota line 209.
Use of uninitialized value in pattern match (m//) at /var/www/ispcp/engine/quota/ispcp-dsk-quota line 210.

------------------

[RatS]

please try to replace starting @ line 207 at /var/www/ispcp/engine/quota/ispcp-dsk-quota

Quote: foreach(@$ref) {
# Replace unknown values by 0
$data_length = (@$_[6] =~ /^\d+$/) ? @$_[6] : 0;
$index_length = (@$_[8] =~ /^\d+$/) ? @$_[8] : 0;

$size += $data_length + $index_length;
}

by

Quote: foreach(@$ref) {
# Replace unknown values by 0
$data_length = (defined(@$_[6]) && @$_[6] =~ /^\d+$/) ? @$_[6] : 0;
$index_length = (defined(@$_[8]) && @$_[8] =~ /^\d+$/) ? @$_[8] : 0;

$size += $data_length + $index_length;
}

Does the warning still occurs?

[kazuo]

The problem was solved.
Thank you.

(11-21-2009 10:19 PM)RatS Wrote:  please try to replace starting @ line 207 at /var/www/ispcp/engine/quota/ispcp-dsk-quota

Quote: foreach(@$ref) {
# Replace unknown values by 0
$data_length = (@$_[6] =~ /^\d+$/) ? @$_[6] : 0;
$index_length = (@$_[8] =~ /^\d+$/) ? @$_[8] : 0;

$size += $data_length + $index_length;
}

by

Quote: foreach(@$ref) {
# Replace unknown values by 0
$data_length = (defined(@$_[6]) && @$_[6] =~ /^\d+$/) ? @$_[6] : 0;
$index_length = (defined(@$_[8]) && @$_[8] =~ /^\d+$/) ? @$_[8] : 0;

$size += $data_length + $index_length;
}

Does the warning still occurs?