thanks for your response

here is my full try which i made, its what i want

my $query = $dbh->prepare("SELECT ordernumber FROM orders ORDER BY cre
+ated ASC");   
$query->execute();
$h_fields = $query->fetchall_arrayref;


####### FUNCATION (A) 
foreach $r (@{$h_fields})
{
    $ordernumber = join(", ", @{$r});
    
    # WHEN I PRINT THE OUTPUT IS 
    
    #  545455
    #  745454
    #  645450


# NOW I WANT TO CHECK EACH ORDER NUMBER VIA LINK
# ITS LIKE I WANT TO RUN HTTP REQUEST FOR EACH ORDER NUMBER

my $url = "LINK/$ordernumber";

my $req = HTTP::Request->new(GET=>$url);
my $resp = $ua->request($req);
my $response = JSON::XS->new->decode ($resp->content);
my $status = $response->{status}; 


# WHILE WE GET ORDER NUMBER WITH MATCHING RESLUTS 
while ( $status eq 'PAID') ) {
  // DO STAFFS HERE
  // WHEN DONE THEN KEEP CHECKING OTHER ORDER NUMBER USING REDO
}
redo;  # REDO FUNCATION (A) AFTER SUCCESS - ITS LIKE RESTART THE WHOLE
+ FUNCATION AGAIN
       # BEACUSE AFTER SUCCESS, I HAVE TO KEEP ALSO CHECKING REAMINING
+ ORDER NUMBER STATUES
}
[download]