blob: 7591b69af131ece52e13b8e36b1d71d8635a8a52 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
package Dakkar::TweetArchive::TraceCalls; use 5.024; use Moo::Role; use experimental 'signatures'; around _json_request => sub($orig,$self, $http_method,$uri,$args, @etc) { warn "calling $http_method $uri"; return $self->$orig($http_method,$uri,$args,@etc); }; 1;
|