Lines Matching +full:sub +full:- +full:spaces
2 # SPDX-License-Identifier: GPL-2.0
4 # Clean a text file -- or directory of text files -- of stealth whitespace.
15 # Clean up space-tab sequences, either by removing spaces or
17 sub clean_space_tabs($)
31 my $ntab = ($npos >> 3) - ($pos >> 3);
56 sub strwidth($) {
85 if ($a =~ /^-/) {
86 if ($a eq '-width' || $a eq '-w') {
89 print STDERR "Usage: $name [-width #] files...\n";
100 if (! -f $f) {
142 $line =~ s/[ \t\r]*$//; # Remove trailing spaces