Select Code to Download

/* This is a comment /* and this is a nested one */ */

/* This is a comment /* and this is a nested one */

local $/ = undef;
$_ = <DATA>;
...
 c = a+b;
 d = c+1; /*I am copying this with a increment*/
}

int myfunc();
 
...
 c = a+b;
 d = c+1; 
}

use Regexp::Common qw( comment );
local $/ = undef;
...
 c = a+b;
 d = c+1; /*I am copying this with a increment*/
}