Lines Matching full:prev
43 my ($prev, $curr, $str);44 $prev = ''; $curr = '';47 print OUTFILE $prev;48 $prev = $curr;52 if ( $prev =~ /<programlisting>$|<screen>$/ ) {53 chomp $prev;54 $curr = join( '', $prev, "<![CDATA[", $curr );55 $prev = '';59 chomp $prev;60 $curr = join( '', $prev, "]]>", $curr );61 $prev = '';