view release on metacpan or  search on metacpan

lib/Business/Stripe/Webhook.pm  view on Meta::CPAN

  die $webhook->error unless $webhook->success;

  my $result = $webhook->process();
  
  if ($webhook->success()) {
      $webhook->reply(status => 'OK');
  } else {
      $webhook->reply(error => $webhook->error());
  }
  
  sub update_invoice {
      # Process paid invoice
      ...
  }
  
  sub update_session {
      # Process checkout
      ...
  }
  
=head1 DESCRIPTION

L<Business::Stripe::Webhook> is a Perl module that provides an interface for handling webhooks sent by Stripe. It provides a simple way to verify the signature of the webhook, and allows the user to define a number of methods for processing specific ...

This module is designed to run on a webserver as that is where Stripe webhooks would typically be sent.  It reads the payload sent from Stripe from C<STDIN> because Stripe sends an HTTP C<POST> request.  Ensure that no other module is reading from C<...