Well, it's no camel code, but it's something :)

#!/usr/bin/perl -w

use strict;

$_=join('',<DATA>);s/$\///g;{/^(.)(.)(.)/;$|{$3}{$2}=$1;s/^...//;
if($_){redo}}foreach$\($|{X}{P}..$|{X}{e},$|{X}{r}..$|{X}{l}){
$|{$\}{$_}?print($|{$\}{$_}):print($")foreach($|{X}{M}..$|{X}{o},
$|{X}{n}..$|{X}{k});print"$/"}__END__
crCHazsqdPapnimaPXnikeFAnmksqbeisalCrVjlwpJeeejsAeiuhbrKAeEAnmmPfptz
ieEyalyeGykxytxbeksoqitxiorinmjHaCamArSmaMXHfCehseMirpuHawkxBtykeNmP
atrpsamBkAyuhccsyPaokACParkxAHaBeFykxCAcksqfotkosmPcotymPcreOjopjeDA
twfukfopkehreLmspdhDheGAAfmtyjrSkeKkAbispbPdotylrLyHfBnijHaxnilhDlPa
qamzkxzejqakykzBakCAamsrfeiuopltweajyoqmalAAflcqzhGjHaAhHmPbotwbeNkt
yheLirptlwtJbfJaeJeanlitwaormotlAejtwctvbrsrssekxxajAkzzHfwniikyAPer
cqAhDmcsChHlsrbAbjWkXeGChDkJedJcfzeXPdrosirSlnmlrUihEjrKBHczeiqlwrzo
XujfrSjrNzctClwsHdzuleHfAaiBcryJdfcqBejuPeoHfxAekehtHfyelrHayekuHeze
MkuldeKlnjihDjhHkeDBctyakAeHzeMmeFCnkirrqsrdulcPasAbkuhdtwdAalajCHbz
lwqrTirprulbrKzJecJebrMyDlXrqqAchotjeECeDzPfqlwuhFjtyisocekquheHfzAn
XAdheNiAdkuifPaueKjrKCeLkhDiPbrArXspfpqX
[download]