Removing Comments with Perl

Question

Is there any regular expression that is able to remove all comments of the // and /**/ variety from a given C program say in perl?

Given the multi-line program, it should use the regular expression to remove the comments and return the non-commented out portion.

Thanks.

Answer 1

Try with Regexp::Common::comment:

  use Regexp::Common qw /comment/;
  while (<>) {
        s/($RE{comment}{C++})//;
  }