Perl XS implementation of URI