Yet Another CPAN Grep

Perinci-Sub-ConvertArgs-Argv ( P/PE/PERLANCAR/Perinci-Sub-ConvertArgs-Argv-0.110.tar.gz, PERLANCAR, 2019; MetaCPAN )

Perinci-Sub-ConvertArgs-Argv/lib/Perinci/Sub/ConvertArgs/Argv.pm ( view source; MetaCPAN )

_args_to_argv);

our %SPEC;

sub _json {
    require JSON;
    state $json = JSON->new->allow_nonref;
    $json->encode($_[0]);
}

sub _encode {
    ref($_[0]) ? _json($_[0]) : $_[0];
}

$SPEC{convert

       }
        } else {
            if (ref $iargs{$_}) {
                push @argv, "$dashopt-json", _encode($iargs{$_});
            } else {
                push @argv, $dashopt, "$iargs{$_}";