I was tempted to translate the prompt and response too, but that would take it beyond the original spec:

use Lingua::Romana::Perligata;

EGRESSO SCRIBE DICTUM SIC PLEASE ENTER THE STRING TO BE CIS
TUM LACUNAM TUM DICTUM SIC SEARCHED FOR THE STRING MONKEY
CIS TUM BIGUTTAM TUM LACUNAM. HUIC VESTIBULO PERLEGEMENTUM DA.
DICTUM SIC STRING MONKEY WAS CIS TUM LACUNAM SCRIBE EGRESSO.
SI HOC TUM DICEMENTUM SIC MONKEY CIS SCRUTAMENTUM TUM NULLUM
PRAESTANTIAM HOCQUE TUM DEMINUEMENTUM DICEMENTUM SIC MONKEY
CIS SCRUTAMENTUM TUM NULLUM PRAESTANTIAM FAC SIC EGRESSO
NOT INQUEMENTUM TUM LACUNAM SCRIBE CIS. SCRIBE EGRESSO DICTUM
SIC FOUND IN THE INPUT STRING CIS TUM NOVUMVERSUM.
[download]

Note that this requires the 0.55 release of Perligata, which (due to the current CPAN woes) is currently only available from my personal mirror.

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.