$question =~ s/<--[^<>]-->//g;