Yet Another CPAN Grep

Mojolicious-Plugin-Config-Structured ( T/TY/TYRRMINAL/Mojolicious-Plugin-Config-Structured-3.01.tar.gz, TYRRMINAL, 2024; MetaCPAN )

Mojolicious-Plugin-Config-Structured/lib/Mojolicious/Plugin/Config/Structured/Command/config_dump.pm ( view source; MetaCPAN )


use Mojo::Base 'Mojolicious::Command';
use Getopt::Long qw(GetOptionsFromArray);

use JSON         qw(encode_json);
use List::Util   qw(max);
use Scalar::Util qw(looks_like_number);
use Syntax::Keywo

);
}

my sub stringify_value($value) {
  return 'undef' unless (defined($value));
  return encode_json($value) if (ref($value));
  return $value              if (looks_like_number($value));
  return q