Reverted last.  Fixed perlcode level bug. Added perlcode level 4.