Subject: | sub 'numerically' |
The sub 'numerically' in Accounts.pm has a small bug: it does not
convert the hex-numbers before comparing them.
This is a fix:
*** Accounts.pm.org 2007-01-30 20:50:48.418120566 +0100
--- Accounts.pm 2007-01-30 20:52:15.180969452 +0100
***************
*** 91,97 ****
bless \%accounts, $self;
}
! sub numerically { $a <=> $b }
sub getDisk
{
--- 91,97 ----
bless \%accounts, $self;
}
! sub numerically { hex($a) <=> hex($b) }
sub getDisk
{
The problem shows when calling the script 'bbClientStatus.pl' (not in
this pacakage):
Argument "df74142" isn't numeric in numeric comparison (<=>) at
/usr/local/share/perl/5.8.7/BoxBackup/Config/Accounts.pm line 93,
<ACCOUNTS> line 2.