#!/usr/bin/perl
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use Text::Format;
my $q = new CGI;
print $q->header();
my $body = "<pre></pre>Hi Lara,<br>&nbsp;&nbsp;&nbsp; The Email Issue (matter getting shattering/ numbers coming in between etc..) was addressed to Joseph and he is looking into this with highest priority. This will be fixed ASAP.<br><br>Thanks,<br>
                                                <br/><br/><br/><br/><br/><br/>
<br/>
Scott Valentine<br>DS - Manager (Mktng)<br>Xxxxxxxx Software Solutions, Inc.<br>XXXXXXXXXXX Medical Transcription Services<br>XXXX Martins Rd.<br>Xxxxxxxx, AZ XXXXX<br>Phone: XXX-XXX-XXXX<br>www.xxxxxxxxxxx.com<br/>";
$body = Text::Format->new({columns => 70,firstIndent    =>   0})->format($body);
print $body;