Lines Matching refs:para
428 $para = "$_"; # Start paragraph string
431 $para .= " $_"; # Add line to paragraph
441 if( $para =~ m/^\s+\S+/ && ! $inlist ) {
445 $para .= ""; # Terminate paragraph
446 print( TMP "$para\n" );
452 $para .= ""; # Terminate paragraph
453 $para =~ s/^\s+//g; # Eliminate any leading space
454 $para =~ s/\s+/ /g; # Canonicalize whitespace
455 $para =~ s/ $//; # Trim final space
456 $para =~ s/([a-zA-Z0-9][.!?][)'"]*) /$1 /g; #' Fix sentance ends
457 print( TMP "\n$para\n\n" );