$string = substr($incoming, 0, 177);
$string  =~ s/\&lt\;?[-.a-zA-Z0-9]*.*?\&gt\;//gs; #This does a great job axing anything basically that starts with a < and ends with a >
$string  =~ s/\&lt\;?[-.a-zA-Z0-9]*.*$//gs; #Due to my substring there is sometimes an open bracket such as <img src...chomp