retrial_pseudo_statement.raku

sub web-retrial(&actions, :$log-message) {
  loop {
    CATCH {
      when X::Cro::HTTP::Error | X::Cro::HTTP::Client::Timeout {
        say $log-message;
        next;
      }
    }
    return actions;
  }
}

sub fetch-execution($execution-id) is cached {
  web-retrial :log-message("$execution-id is being refetched..."), {
    my $response = await $*client.get("https://some-jira-endpoint",
      query => {
        fields => 'some jira fields' 
      },
      :$*auth,
      :20timeout
      );
    await $response.body;
  }
}