in reply to Hi Perlmonks, I have need to write a script to do the following

Thanks to the power of CPAN, this is an easy problem to solve.

#! /usr/local/bin/perl -w use Acme::DonMartin; sittzle klikrunk snork blooma shlikle crugazunch stroinggoink kik praw +k shik fip skroinch glika skribble gloydoip aaak sklerch tear gloot sput +z pat shlikle whomp krakkle spmam fush pwadak shpork bluka flork skwako oof shploip paf kridit zizzak fliff bahoo tip bap gashplutzga snikker aaak blut pluf rrrrrr glont snat shklink fwaddapp tippity sklukle schlip shpishle klang tear plapf pluf sklortch flut kaboomm gloochle pflap blapple sazzikk phoon dakkadak spamamp glomp thloop skrak aaak kik pittooie shnip tood skreee shklizzortch glomp skluk swizap vroon swizap fween skapasch pam spopple stroinggoink slurp zazik deebe koong fashklork zazik sworf fwap kik gloydoip dubba shpishle shpliple teeoo phwam glink glink pwadak floba wink kaheeee dugga twong zlitz fidip zlitz foomp mabbit tok skroik sput

Explaining the algorithm is left as an exercise to the student. Or teacher.

• another intruder with the mooring in the heart of the Perl

  • Comment on Re: Hi Perlmonks, I have need to write a script to do the following
  • Download Code