main()
{ 
 /* the object of this program */   /*is to write*/
int c,d,e,f=0;  /* a perl program to delete all */
for (c=1,j<=99;c++)  /* all the stinking comments*/
 {
  printf("hi world %d\n",c,j); /*the end is near */
 }                             /*i hope not      */
}


and here is the perl code to do it
its written in perl4

open(CCODE,"stuff.c");
while(<CCODE>)
 {
  s#/\*.*?\*\/##;
  print;
 }

• Crazy Atheist Libertarian
• Government Snitch?????
• David Dorn
• Fat Blond Guy
• Crazy Atheist