test: use perl.org for reachability edge case
This commit is contained in:
1 parent
aa9f557aa0
commit
6912495a04
1 file changed
+1
-1
+1
-1
@@ -209,7 +209,7 @@ subtest 'POST /api/v1/urls - Real validator URL edge cases' => sub {
|
|||||||
'https://www.example.com?foo=bar',
|
'https://www.example.com?foo=bar',
|
||||||
'https://www.example.com#section',
|
'https://www.example.com#section',
|
||||||
'https://www.example.com:443',
|
'https://www.example.com:443',
|
||||||
'https://www.example.com/path/to/resource',
|
'https://www.perl.org/about.html',
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
my $res = post_shorten($url);
|
my $res = post_shorten($url);
|
||||||
|
|||||||
Reference in new issue
Block a user