SMG keyboard interface

I've been hacking around with some code that interfaces to SMG's keyboard routines.  The module exposes SMG$READ_STRING, SMG$READ_COMPOSED_LINE and SMG$READ_KEYSTROKE.  I also created a Term::ReadLine::SMG that uses this module.  If anyone is interested, I'll clean it up, put on the finishing touches and upload it to CPAN.