#!/usr/bin/perl -w use strict; $_=join('',);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