Lines Matching refs:w
100 my $w = -1;
104 $w += length($_);
105 $w++;
108 my $inject = $width - $w;
144 my $w = 0;
152 if(($w + $l + $spaces) >= $width) {
155 $w = 0;
159 $w += $l; # new width
161 if($w) {
197 my $w = ($baselvl + $lvl + 1) * $indent + length($l);
198 if ($w > $colwidth) {
199 print STDERR "ERROR: $w columns is too long\n";