Perinci::CmdLine::Lite") && ($args{_func_args}{-cmdline_r}{format} // '') !~ /json/) { my $data = $args{_data}; for (@$data) { $