CPAN::Groonga

Group
Extension

Matches 35358

MARC-Schema ( J/JO/JOROL/MARC-Schema-0.16.tar.gz, JOROL, 2024; MetaCPAN )
MARC-Schema/lib/MARC/Schema.pm ( view source; MetaCPAN ) 
package MARC::Schema;

use strict;
use warnings;

our $VERSION = '0.16';

use Cpanel::JSON::XS;
use File::Share ':all';
use File::Slurper 'read_binary';
use Scalar::Util qw(reftype);

sub new {
    my
ift;
    my $json;
    if ($self->{file}) {
        $json = read_binary($self->{file});
    }
    else {
        $self->{file} = dist_file('MARC-Schema', 'marc-schema.json');
        $json = read_bina
ry($self->{file});
    }
    my $schema = decode_json($json);

    return $schema->{fields};
}

sub check {
    my ($self, $record, %options) = @_;

    $record = $record->{record} if reftype $record
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Extension/UnixAccount.pm ( view source; MetaCPAN ) 
m $unix_account_ext->TO_JSON

Helper for JSON encoders.

=item $unix_account_ext->to_hash

Return the object HASH.

=item $unix_account_ext->to_string

Encode the object in JSON.

=item $unix_account_
ext->validate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the issue tracke
HTTP-Tiny ( H/HA/HAARG/HTTP-Tiny-0.090.tar.gz, HAARG, 2024; MetaCPAN )
HTTP-Tiny/lib/HTTP/Tiny.pm ( view source; MetaCPAN ) 
/www.w3.org/TR/html4/interact/forms.html#h-17.13.4.1
# perl 5.6 ready UTF-8 encoding adapted from JSON::PP
my %escapes = map { chr($_) => sprintf("%%%02X", $_) } 0..255;
$escapes{' '}="+";
my $unsafe_
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Type/WindowsPEOptionalHeader.pm ( view source; MetaCPAN ) 
tant SCHEMA =>
    'https://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/observables/file.json#/definitions/windows-pe-optional-header-type';

use constant PROPERTIES =>
type->TO_JSON

Helper for JSON encoders.

=item $windows_pe_optional_header_type->to_hash

Return the object HASH.

=item $windows_pe_optional_header_type->to_string

Encode the object in JSON.

=item
 $windows_pe_optional_header_type->validate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature req
Locale-Maketext-Utils ( D/DM/DMUEY/Locale-Maketext-Utils-0.43.tar.gz, DMUEY, 2024; MetaCPAN )
Locale-Maketext-Utils/lib/Locale/Maketext/Utils.pod ( view source; MetaCPAN ) 
oluted like:

    [%- SET item_list = [] -%]
    [%- FOREACH i IN api_mt_result; item_list.push(i.json); END -%]
    [% '\[% locale.makevar(' _ item_list.join(", ") _ ') %\]' | evaltt %]

=head2 $lh->
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Type/EmailMIMEPart.pm ( view source; MetaCPAN ) 
t SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/observables/email-message.json#/definitions/mime-part-type';

use constant PROPERTIES => (qw(
    bo
=item $mime_part_type->TO_JSON

Helper for JSON encoders.

=item $mime_part_type->to_hash

Return the object HASH.

=item $mime_part_type->to_string

Encode the object in JSON.

=item $mime_part_type-
>validate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the issue tracker
at
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Extension/RasterImage.pm ( view source; MetaCPAN ) 
m $raster_image_ext->TO_JSON

Helper for JSON encoders.

=item $raster_image_ext->to_hash

Return the object HASH.

=item $raster_image_ext->to_string

Encode the object in JSON.

=item $raster_image_
ext->validate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the issue tracke
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Extension/WindowsPEBinary.pm ( view source; MetaCPAN ) 
_pe_binary_ext->TO_JSON

Helper for JSON encoders.

=item $windows_pe_binary_ext->to_hash

Return the object HASH.

=item $windows_pe_binary_ext->to_string

Encode the object in JSON.

=item $windows_
pe_binary_ext->validate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the is
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/Type/WindowsRegistryValue.pm ( view source; MetaCPAN ) 
EMA =>
    'https://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/observables/windows-registry-key.json#/definitions/windows-registry-value-type';

use constant PROPERTIE
lue_type->TO_JSON

Helper for JSON encoders.

=item $windows_registry_value_type->to_hash

Return the object HASH.

=item $windows_registry_value_type->to_string

Encode the object in JSON.

=item $wi
ndows_registry_value_type->validate

Validate the object using JSON Schema
(see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests th
Wikibase-API ( S/SK/SKIM/Wikibase-API-0.07.tar.gz, SKIM, 2024; MetaCPAN )
Wikibase-API/API/Resolve.pm ( view source; MetaCPAN ) 
 qw(set_params);
use File::Spec::Functions qw(catfile);
use IO::Barf qw(barf);
use JSON::XS qw(decode_json encode_json);
use Perl6::Slurp qw(slurp);
use Readonly;
use Wikibase::API;

Readonly::Array o
id_file) {
		$struct_hr = decode_json(slurp($qid_file));
	} else {
		$self->_lazy_api;
		$struct_hr = $self->{'api'}->get_item_raw($qid);
		barf($qid_file, encode_json($struct_hr));
	}

	my $item_obj
Geo-Leaflet ( M/MR/MRDVT/Geo-Leaflet-0.03.tar.gz, MRDVT, 2024; MetaCPAN )
Geo-Leaflet/lib/Geo/Leaflet/icon.pm ( view source; MetaCPAN ) 
package Geo::Leaflet::icon;
use strict;
use warnings;
use base qw{Package::New};
use JSON::XS;

our $VERSION = '0.03';
our $PACKAGE = __PACKAGE__;

=head1 NAME

Geo::Leaflet::icon - Leaflet icon objec
icon(%s);}, $self->JSON->encode($self->options));
}

=head2 JSON

=cut

sub JSON {
  my $self        = shift;
  $self->{'JSON'} = JSON::XS->new->allow_nonref;
  return $self->{'JSON'};
}

=head1 SEE A
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/AutonomousSystem.pm ( view source; MetaCPAN ) 
SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/observables/autonomous-system.json';

use constant PROPERTIES =>
    (qw(type id), qw(spec_version obj
autonomous_system->TO_JSON

Encode the object in JSON.

=item $autonomous_system->to_hash

Return the object HASH.

=item $autonomous_system->to_string

Encode the object in JSON.

=item $autonomous_s
ystem->validate

Validate the object using JSON Schema
(see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the issue trac
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Observable/IPv4Addr.pm ( view source; MetaCPAN ) 
ant SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/observables/ipv4-addr.json';

use constant PROPERTIES => (
    qw(type id),
    qw(spec_version ob


=over

=item $ipv4_addr->TO_JSON

Encode the object in JSON.

=item $ipv4_addr->to_hash

Return the object HASH.

=item $ipv4_addr->to_string

Encode the object in JSON.

=item $ipv4_addr->validate
Perinci-CmdLine ( P/PE/PERLANCAR/Perinci-CmdLine-2.000.1.tar.gz, PERLANCAR, 2024; MetaCPAN )
Perinci-CmdLine/lib/Perinci/CmdLine/Manual.pod ( view source; MetaCPAN ) 
so be passed as JSON or
YAML. For example, if the C<tags> argument is defined as 'array', then all of
below are equivalent:

 % mycmd --tags-yaml '[foo, bar, baz]'
 % mycmd --tags-json '["foo","bar","
commands)

=item * Configurable output format (--format, --format-options)

By default C<yaml>, C<json>, C<text>, C<text-simple>, C<text-pretty> are
recognized.

=back

=head1 ABOUT THIS MANUAL

This 
 to be parsed using JSON, and then YAML. This is
convenient for common cases:

 --aoa  '[[1],[2],[3]]'  # parsed as JSON
 --hash '{a: 1, b: 2}'   # parsed as YAML

For explicit JSON parsing, all argum
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Incident.pm ( view source; MetaCPAN ) 
onstant SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/sdos/incident.json';

use constant PROPERTIES => (
    qw(type spec_version id created modifie
_JSON

Encode the object in JSON.

=item $incident->to_hash

Return the object HASH.

=item $incident->to_string

Encode the object in JSON.

=item $incident->validate

Validate the object using JSON
Module-ScanDeps ( R/RS/RSCHUPP/Module-ScanDeps-1.37.tar.gz, RSCHUPP, 2024; MetaCPAN )
Module-ScanDeps/lib/Module/ScanDeps.pm ( view source; MetaCPAN ) 


    'JSON.pm'                           => sub {
        # add JSON/PP*.pm, JSON/PP/*.pm
        # and ignore other JSON::* modules (e.g. JSON/Syck.pm, JSON/Any.pm);
        # but accept JSON::XS, t
se JSON.pm might use it if present)
        return( grep /^JSON\/(PP|XS)/, _glob_in_inc('JSON', 1) );
    },
    'JSON/MaybeXS.pm'                   => [qw(
        Cpanel/JSON/XS.pm JSON/XS.pm JSON/P
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Relationship.pm ( view source; MetaCPAN ) 
stant SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/sros/relationship.json';

use constant PROPERTIES => (
    qw(type spec_version id created modif
r

=item $relationship->TO_JSON

Encode the object in JSON.

=item $relationship->to_hash

Return the object HASH.

=item $relationship->to_string

Encode the object in JSON.

=item $relationship->val
idate

Validate the object using JSON Schema (see L<STIX::Schema>).

=back


=head1 SUPPORT

=head2 Bugs / Feature Requests

Please report any bugs or feature requests through the issue tracker
at L<h
Perinci-CmdLine ( P/PE/PERLANCAR/Perinci-CmdLine-2.000.1.tar.gz, PERLANCAR, 2024; MetaCPAN )
Perinci-CmdLine/lib/Perinci/CmdLine/Manual/FAQ.pod ( view source; MetaCPAN ) 
 scalars (check at most 5 elements), print
as table.

7) otherwise print as JSON (after cleaning it with L<Data::Clean::JSON>).

YAML and the other formats are not supported.

Table is printed using t
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Campaign.pm ( view source; MetaCPAN ) 
onstant SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/sdos/campaign.json';

use constant PROPERTIES => (
    qw(type spec_version id created modifie
_JSON

Encode the object in JSON.

=item $campaign->to_hash

Return the object HASH.

=item $campaign->to_string

Encode the object in JSON.

=item $campaign->validate

Validate the object using JSON
STIX ( G/GD/GDT/STIX-1.01.tar.gz, GDT, 2024; MetaCPAN )
STIX/lib/STIX/Opinion.pm ( view source; MetaCPAN ) 
onstant SCHEMA =>
    'http://raw.githubusercontent.com/oasis-open/cti-stix2-json-schemas/stix2.1/schemas/sdos/opinion.json';

use constant PROPERTIES => (
    qw(type spec_version id created modified
TO_JSON

Encode the object in JSON.

=item $opinion->to_hash

Return the object HASH.

=item $opinion->to_string

Encode the object in JSON.

=item $opinion->validate

Validate the object using JSON S
Powered by Groonga
Maintained by Kenichi Ishigaki <ishigaki@cpan.org>. If you find anything, submit it on GitHub.