Lines Matching refs:widths

1640     my @widths = map length, @perl_labels;
1645             for my $i (0..$#widths) {
1648                 $widths[$i] = $l if $l > $widths[$i];
1676                 for (0..$#widths) {
1677                     printf " %*s", $widths[$_],
1678                         $i ? ('-' x$widths[$_]) : $perl_labels[$_];
1704             for my $i (0..$#widths) {
1706                                             $widths[$i]);
1757     my @widths = map length, @fields;
1764             $widths[$i] = $l if $l > $widths[$i];
1770     printf " %*s", $widths[$_], $fields[$_] for 0..$#fields;
1772     printf " %*s", $_, ('-' x $_) for @widths;
1787             print " ", grind_format_cell($res->{$fields[$i]}, $widths[$i]);