strip //DOC comments during printing
This commit is contained in:
parent
d42cbd75b2
commit
4ed996f552
1 changed files with 1 additions and 0 deletions
1
runoff1
1
runoff1
|
@ -19,6 +19,7 @@ $linenum = 0;
|
||||||
foreach (@lines) {
|
foreach (@lines) {
|
||||||
$linenum++;
|
$linenum++;
|
||||||
chomp;
|
chomp;
|
||||||
|
s!//DOC.*!!;
|
||||||
s/\s+$//;
|
s/\s+$//;
|
||||||
if(length() >= 75){
|
if(length() >= 75){
|
||||||
print STDERR "$file:$linenum: line too long\n";
|
print STDERR "$file:$linenum: line too long\n";
|
||||||
|
|
Loading…
Reference in a new issue