Lines Matching refs:line
92 my $line = $_;
93 if($line =~ /\{/ && $printout) {
97 print OUT processLine($line);
100 if( $line =~ /\}/ && $printout) {
112 my $line = shift;
113 $_ = $line;
141 my $line;
149 foreach $line (@lines) {
151 if($line =~ /^$/) {
157 $line = NFC($line);
159 if($line =~ /<{1,4} |= |& \[.*\]|& /) {
190 if($line =~ /^<<<</) {
191 $line = " $line";
192 } elsif($line =~ /^<<</) {
193 $line = " $line";
194 } elsif($line =~ /^<</) {
195 $line = " $line";
196 } elsif($line =~ /^</) {
197 $line = " $line";
198 } elsif($line =~ /^=/) {
199 $line = " $line";
204 $line =~ s#/# / #g;
206 $line =~ s/\&/&/g;
208 $line =~ s/ / /g;
210 $line =~ s/</</g;
212 $line =~ s/>/>/g;
214 #$lines[$i] = $name.$lrm.$line."</span><br>";
216 $result .= $name.$lrm.$line.$spanEnd."<br>\n";