if($lines =~ m/\>/){

$lines =~ s/^\>\s//gi;

if($lines =~ m/\</){

$lines =~ s/^\<\s//gi;