Any interest so far from my brethern in Geordieland? Or is there some work required on a CPAN module that translates the local vernacular into human readable English?
#!/usr/bin/perl -w
use strict
use Acme::Geordie
while (<>) {
/$EXPRESSION{"Dinnae dunsch uz, wa Geordies!"}/
and print q{"Don\'t crash into us. We are Geordies and will hurt
+you.\n"};
/$EXPRESSION{"Ye oop?"}/
and print q{"Are you up?\n"};
/$EXPRESSION{"Why aye man!"}/
and print q{"Of course.\n"};
}
The above is a shameless ripoff of Regexp::Common, and probably wouldn't work the way I thought it would...but what the hell :-)