use URI::Find; # instead of URI::Find::Schemeless
...
my $finder = URI::Find->new # instead of URI::Find::Schemeless
(
sub {
my ($uri, $originalUri) = @_;
# error: encode_entities is missing
# return qq~$originalUri~;
return
q// .
encode_entities($originalUri) . q/>/;
}
);
...