use strict;
use URI::Find;
# Time passes
sub test_uri {
  my $val = shift;
  my $copy = $val;
  my $found;
  find_uris($copy, sub {
      $found = shift;
    }
  );
  return $val eq $found;
}