#!/usr/local/bin/perl 
$question = '<B>Hello World</B> 
<!-- This comment would need to be removed from the entry --> 
<font color=red>It is Sunday!</FONT>'; 
$question =~ s/<!--[^-]+-->//g; 
print $question;
o/p: <B>Hello World</B> 

<font color=red>It is Sunday!</FONT>