Subject: | New (2009) versions of URI::Find break Catalyst::Plugin::Session::State::URI |
Hiya.
Recent releases of URI::Find have started capturing accidental chunks of
HTML if some of the input includes HTML fragments.
I have attached a minimal test case to demonstrate this, extracted from
Catalyst::Plugin::Session::State::URI.
I'm planning to change the tests of that module to avoid this bug,
however this is certainly a regression as it only started happening
recently.
Cheers
t0m
Subject: | URI-Find-regression.t |
#!/usr/bin/env perl
use strict;
use warnings;
use URI::Find;
use Test::More tests => 1;
my $text = q{foo <a href="http://www.test.org/"></a> blah};
my $uri;
URI::Find->new(sub{
my (undef, $orig_uri) = @_;
$uri = $orig_uri;
})->find(\$text);
is $uri, 'http://www.test.org/';