>See HTTP::Headers. Don't convert them to a string and then try to parse out the >Link, but access it directly, using the ->header() method:

#!perl
use warnings;
use strict;
use HTTP::Headers;
use 5.012;

my $headers = HTTP::Headers->new();

$headers->header(
    'Cache-Control' => 'no-cache, no-store',
    'Connection' => 'close',
    'Date' => 'Fri, 26 Mar 2021 02:11:16 GMT',
    'Pragma' => 'no-cache',
    'Server' => 'nginx',
    'Vary' => 'Accept-Encoding',
    'Content-Type' => 'application/json',
    'Expires' => '0',
    'Client-Date' => 'Fri, 26 Mar 2021 02:11:16 GMT',
    'Client-Peer' => '10.10.1.32:8080',
    'Client-Response-Num' => '1',
    'Client-Transfer-Encoding' => 'chunked',
    'Expect-Ct' => 'report-uri="https://org.extract.net", max-age=0',
    'Link' => '<https://sso.myorg.com/api/v5/myids?limit=200>; rel="se
+lf"',
    'Link' => '<https://sso.myorg.com/api/v5/myids?after=200xxxxxxxxxx
+xxxxxxx&limit=200>; rel="next"',
);

say "Found link headers:";
for my $h ( $headers->header('Link') ) {
    if( $h =~ /\brel="next"/ ) {
        say "Found 'next' link: $h";
    } else {
        say "Ignoring other Link header: $h";
    };
};

__END__
Found link headers:
Ignoring other Link header: <https://sso.myorg.com/api/v5/myids?limit=
+200>; rel="self"
Found 'next' link: <https://sso.myorg.com/api/v5/myids?after=200xxxxxx
+xxxxxxxxxxx&limit=200>; rel="next"

[download]

In reply to Re: Perl to collect "Link" values contains "next" by Corion
in thread Perl to collect "Link" values contains "next" by chandantul

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.