1#!/usr/bin/perl
2
3# Cleans up C++ style comments and converts them to C
4
5while (<>) {
6 $line = $_;
7 $line =~ s/\/\/([^;]*)(\n)$/\/\*$1 \*\/\n/;
8 print $line;
9}
10