Yet Another CPAN Grep

WebService-FOAAS ( M/MG/MGV/WebService-FOAAS-0.002.tar.gz, MGV, 2018; MetaCPAN )

WebService-FOAAS/lib/WebService/FOAAS/Codegen.pm ( view source; MetaCPAN )

ervice::FOAAS::Codegen;

use 5.014000;
use strict;
use warnings;

use HTTP::Tiny;
use JSON::MaybeXS qw/decode_json/;

our $VERSION = '0.002';

sub run {
	my $ht = HTTP::Tiny->new;
	my $result = $ht->g

gen->run

\=head1 AVAILABLE METHODS

\=over
EOF

	my @ops = map { $_->{url} =~ y/-/_/r } @{decode_json $result->{content}};
	for my $op (@ops) {
		my (undef, $name, @args) = split '/', $op;
		my $narg