Select Code to Download

    $question =~ s/<!--.*?-->//sg;

#!/usr/bin/perl -w
use strict;
...
my $stripper = File::Comments->new();
my $stripped = $stripper->stripped("foo.html");
print "$stripped\n";