Perl: implement XCALL.