remove //DOC in the right place
This commit is contained in:
parent
4ed996f552
commit
fd8e368101
1
pr.pl
1
pr.pl
|
@ -20,6 +20,7 @@ for($i=0; $i<@lines; $i+=50){
|
|||
print "$now $h Page $page\n";
|
||||
print "\n\n";
|
||||
for($j=$i; $j<@lines && $j<$i +50; $j++){
|
||||
$lines[$j] =~ s!//DOC.*!!;
|
||||
print $lines[$j];
|
||||
}
|
||||
for(; $j<$i+50; $j++){
|
||||
|
|
Loading…
Reference in a new issue