Yet Another CPAN Grep

CLI-Helpers ( B/BL/BLHOTSKY/CLI-Helpers-2.2.tar.gz, BLHOTSKY, 2025; MetaCPAN )

CLI-Helpers/lib/CLI/Helpers.pm ( view source; MetaCPAN )

Basename;
use Getopt::Long qw(GetOptionsFromArray);
use IO::Interactive qw( is_interactive );
use JSON::MaybeXS;
use Module::Load qw(load);
use Ref::Util qw(is_ref is_arrayref is_hashref);
use Sys::Sy

CLASS     => $opts->{'debug-class'} || 'main',
        ENCODE          => lc($opts->{encode}  || 'json'),
        VERBOSE         => $opts->{verbose} || 0,
        KV_FORMAT       => ': ',
        QUI


    );
    $DEF{COLOR} = $opts->{color} // git_color_check();
    $DEF{ENCODE} = 'json' unless $DEF{ENCODE} eq 'json' or $DEF{ENCODE} eq 'yaml';

    debug("DEFINITIONS");
    debug_var(\%DEF);