$comments =~ s/<!--.*?-->//g;
$comments =~ s/<!--(.|\s)*?-->//g;