diff --git a/t/api-all-links.t b/t/api-all-links.t index 94c6d40e20..c5e225fb0a 100644 --- a/t/api-all-links.t +++ b/t/api-all-links.t @@ -36,9 +36,9 @@ $ua->ssl_opts( my @hopts = split /\s*,\s*/, $res->header('Allow'); my @links = $res->header('Link'); + my $rex = qr!^; rel="collection http://purl\.org/sipwise/ngcp-api/#rel-([a-z]+s|topupcash)"$!; foreach my $link(@links) { - my $rex = qr!^; rel="collection http://purl\.org/sipwise/ngcp-api/#rel-([a-z]+s)"$!; - my ($relname) = ($link =~ $rex); + (my ($relname)) = ($link =~ $rex); # now get this rel $req = HTTP::Request->new('OPTIONS', "$uri/api/$relname/"); $res = $ua->request($req);