now this is a complete part of code, and how i have done it.

my $Check_orderId = $dbh->prepare("SELECT OrderId FROM items ORDER BY +created ASC LIMIT 1"); $Check_orderId->execute(); my $Id = $Check_orderId->fetchrow(); if ($Id) { for ($Id) { my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, ); $ua->agent("MyApp/0.1"); my $url = "https://link.com/$Id"; my $req = HTTP::Request->new(GET=>$url); $req->header('Content-Type' => 'application/json; charset=UTF-8'); $req->header('X-CC-Api-Key' => ''); $req->header('X-CC-Version' => ''); my $Response = $ua->request($req); my $getback = JSON::XS->new->decode ($Response->content); my $Status = $getback->{status}; if ($Status ne 'received') { my $Check_orderId = $dbh->prepare("SELECT OrderId FROM items ORDER BY +created ASC LIMIT 1"); $Check_orderId->execute(); while ( my $Id = $Check_orderId->fetchrow() ) { next if($Status ne 'received'); my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, + ); $ua->agent("MyApp/0.1"); my $url = "https://link.com/$Id"; my $req = HTTP::Request->new(GET=>$url); $req->header('Content-Type' => 'application/json; charset=UTF-8'); $req->header('X-CC-Api-Key' => ''); $req->header('X-CC-Version' => ''); my $Response = $ua->request($req); my $getback = JSON::XS->new->decode ($Response->content); my $Status = $getback->{status}; } } if ($Status eq 'received') { # do staff, while done continue and check other row } } } $dbh->disconnect;

am using fetchrow because i want to select only 1 row not all at once but just 1 by 1

now main problem, i have OrderId's in DB but i want to select 1 by 1 and check the status via the api link, but if the selected OrderId status doesnt match with the status i want, then continue to next row and check for other OrderId status


In reply to Re^2: checking mysql rows continuously by bigup401
in thread checking mysql rows continuously by bigup401

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.