#! /bin/bash

i=$1
o=`echo $i | sed 's/pde$/java/'`

# One-liner
perl -pe 's!^\Q//*J*\E/!/*J*/!' $i |
perl -pe 's!^\Q/*C*/\E!//*C*/!' |
# Blocks
perl -pe 's!^\Q//*C\E$!/*C!' |
perl -pe 's!^\Q//C*/\E$!C*/!' |
perl -pe 's!^\Q/*J\E$!//*J!' |
perl -pe 's!^\QJ*/\E$!//J*/!' >$o