# <= 0 : Preformat entire document
				#    1 : one line triggers
				# >= 2 : two lines trigger
# [-pe    ] | [--preend                     ]
$endpreformat_trigger_lines = 2; # How many lines of unpreformatted-looking
				 # text are needed to switch from 
                                 # <= 0 : Never preformat within document
				 #    1 : one line triggers
				 # >= 2 : two lines trigger
# NOTE for --prebegin and --preend:
# A zero takes precedence.  If one is zero, the other is ignored.
# If both are zero, entire document is preformatted.
# [-r     ] | [--hrule                      ]
$hrule_min = 4;			# Min number of ---s for an HRule.
# [-c     ] | [--caps                       ]
$min_caps_length = 3;		# min sequential CAPS for an all-caps line
# [-ct  ] | [--capstag                  ]
$caps_tag = "STRONG";		# Tag to put around all-caps lines
# [-m/+m     ] | [--mail        / --nomail        ]
$mailmode = 0;			# Deal with mail headers & quoted text
# [-u/+u     ] | [--unhyphenate / --nounhyphenate ]
$unhyphenation = 1;		# Enables unhyphenation of text.
# [-a  ] | [--append                  ]
# [+a        ] | [--noappend                      ]
$append_file = 0;		# If you want something appended by
				# default, put the filename here.
				# The appended text will not be
				# processed at all, so make sure it's
				# plain text or decent HTML.  i.e. do
				# not have things like:
				#   Seth Golub 
				# but instead, have:
				#   Seth Golub 
# [-t 
if ($line =~ /(.*)\s*$/)


#    $line =~ s///;

{

    $title2 =~ s///;

    $title2 = $line;
    print "\n";
    print "
$title2
\n";
    $line =~ s/(.*)//;
}
if ($line =~ /^(.*)rmb.simplenet.com(.*)\s*$/)
{
    $line =~ s/rmb.simplenet.com/rmb.simplenet.com/;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
{
    $line =~ s/(.*)//;
}
if ($line =~ /From.awp\@(.*)$/)
{
    $line =~ s/(.*)//;
}
	print $prev;
	if (!&is;_blank($nextline))
	{
	    $previous_action = $line_action;
	    $line_action     = $NONE;
	}
	$prev = $line;
	$line = $nextline;
	$nextline = ;
    } until (!$nextline && !$line && !$prev);
}
&main;();