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"};
}
[download]

The above is a shameless ripoff of Regexp::Common, and probably wouldn't work the way I thought it would...but what the hell :-)