| Subject: | duplicate variable definition |
"my" variable $cols masks earlier declaration in same statement at
/usr/local/share/perl/5.8.0/Array/PrintCols.pm line 60.
and line 60 is:
my($key,$max_len,$cols,$fmt,$cols,$col,$rows,$row);
$cols is in there twice.