$data =~ s/^\s+|\s+$/;

##</code><code>##

$data =~ s/^\s+|\s+$/g;