How about X-Perl?