BEGIN { $^I = ''; }
while (<>) {
    s+//++g;
    s+//++g;
    s+//+//+g;
    if ( not m+^/+ ) {
         s+/+\${OBJECT}/+g;
         print
    }
}