1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
use strict; use warnings; use Test::More; use Net::HTTP::Spore; my $api_with_payload = { base_url => 'foo', methods => { create_user => { method => 'POST', path => '/user', payload_required => 1, } } };