#! /bin/bash

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

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