Here is a tip

    -> on_action( \&return_action_header )
   ....
   ;;;;
sub return_action_header {
   my( $action, $method_uri, $method_name ) = @_;
   return ...
}
[download]