music album.
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::MusicPlaylist /;
use MooX::JSON_LD 'MusicRelease';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use n
edicate => '_has_catalog_number',
json_ld => 'catalogNumber',
);
has credited_to => (
is => 'rw',
predicate => '_has_credited_to',
json_ld => 'creditedTo',
);
has dura
dicate => '_has_duration',
json_ld => 'duration',
);
has music_release_format => (
is => 'rw',
predicate => '_has_music_release_format',
json_ld => 'musicReleaseFormat',
with pages
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::UserInteraction /;
use MooX::JSON_LD 'UserBlocks';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use nam
BSTRACT: A class
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Intangible /;
use MooX::JSON_LD 'Class';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use namespac
.0.0';
has superseded_by => (
is => 'rw',
predicate => '_has_superseded_by',
json_ld => 'supersededBy',
);
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
SemanticWeb::Sch
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::EnergyEfficiencyEnumeration /;
use MooX::JSON_LD 'EnergyStarEnergyEfficiencyEnumeration';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PRE
est course of action
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Review /;
use MooX::JSON_LD 'Recommendation';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use
ION = 'v23.0.0';
has category => (
is => 'rw',
predicate => '_has_category',
json_ld => 'category',
);
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
SemanticWeb::Schema:
or cargo over land
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Product /;
use MooX::JSON_LD 'Vehicle';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use namesp
cate => '_has_acceleration_time',
json_ld => 'accelerationTime',
);
has body_type => (
is => 'rw',
predicate => '_has_body_type',
json_ld => 'bodyType',
);
has call_si
predicate => '_has_call_sign',
json_ld => 'callSign',
);
has cargo_volume => (
is => 'rw',
predicate => '_has_cargo_volume',
json_ld => 'cargoVolume',
);
has date_
d $sketch | ") or die "ERROR: could not run mash info -d on $sketch: $!";
} elsif($sketch =~ /\.json$/){
open($fh, $sketch) or die "ERROR: could not read $sketch: $!";
}
while(<$fh>){
if
ib dirname($INC{"Mashtree/Mash.pm"})."/..";
use Mashtree qw/_truncateFilename logmsg/;
use JSON qw/from_json/;
use Bio::Seq;
use Bio::SimpleAlign;
use Bio::Align::DNAStatistics;
use Bio::Tree::Distan
$self;
}
sub info{
my($self,$msh)=@_;
my %info = %{ $self->{info} };
my $mashInfo=from_json(`mash info -d $msh`);
for my $sketch(@{ $$mashInfo{sketches} }){
#delete($$sketch{hashes})
qw/part/;
use POSIX qw/floor/;
# if JSON::XS is installed, it will be automatically used.
# Specify () so that no functions are exported. We will use OO.
use JSON ();
use IO::Handle; # allows me to
100.";
}
# Give a warning if JSON is going to be slow later
my $jsonTmp = JSON->new();
if(! $jsonTmp->is_xs){
logmsg "WARNING: the currently installed JSON module will make this script ver
y slow when jack knifing. To avoid this error, install the JSON::XS module like so: `cpanm ~l ~ JSON::XS`.";
}
## Catch some options that are not allowed to be passed
# Tempdir: All mashtree
earch results page.
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::WebPage /;
use MooX::JSON_LD 'SearchResultsPage';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
n $info;
}
# read image/movie metadata from a text file. The metadata is assumed
# to be in JSON or YAML format and to contain tags as produced by
# "exiftool -n -j", optionally (and preferably
} else {
my $type;
if (($info->get('MIMEType') // '') =~ m'application/(json|yaml)') {
# the MIMEType is detected based on the file's contents,
# regard
the air or online.
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Service /;
use MooX::JSON_LD 'BroadcastService';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
u
predicate => '_has_area',
json_ld => 'area',
);
has broadcast_affiliate_of => (
is => 'rw',
predicate => '_has_broadcast_affiliate_of',
json_ld => 'broadcastAffiliateOf'
adcast_display_name',
json_ld => 'broadcastDisplayName',
);
has broadcast_frequency => (
is => 'rw',
predicate => '_has_broadcast_frequency',
json_ld => 'broadcastFrequen
lasses for http://schema.org/ classes
use v5.14;
use Moo;
use List::Util qw/ first /;
use MooX::JSON_LD 'base';
use Ref::Util qw/ is_blessed_ref is_plain_arrayref /;
use Types::Standard qw/ Str /;
Type::Tiny::XS
has id => (
is => 'rw',
isa => Str,
predicate => 1,
json_ld => '@id',
);
around _build_context => sub { return 'http://schema.org/' };
1;
__END__
h',
);
print $person->json_ld;
=head1 DESCRIPTION
This distribution contains Perl classes for L<https://schema.org>
semantic markup. These can be used to generate JSON-LD
to embed in websites.
HTTP::Request->new( uc $method, $uri );
$request->header( 'Content-Type' => 'application/json' );
$request->content($body);
return $self->ua->request($request);
}
}
sub a
describe a seat
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Intangible /;
use MooX::JSON_LD 'Seat';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use namespace
predicate => '_has_seat_number',
json_ld => 'seatNumber',
);
has seat_row => (
is => 'rw',
predicate => '_has_seat_row',
json_ld => 'seatRow',
);
has seat_section
predicate => '_has_seat_section',
json_ld => 'seatSection',
);
has seating_type => (
is => 'rw',
predicate => '_has_seating_type',
json_ld => 'seatingType',
);
1;
_
CT: An article
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::CreativeWork /;
use MooX::JSON_LD 'Article';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use namesp
dicate => '_has_article_body',
json_ld => 'articleBody',
);
has article_section => (
is => 'rw',
predicate => '_has_article_section',
json_ld => 'articleSection',
);
h
w',
predicate => '_has_backstory',
json_ld => 'backstory',
);
has page_end => (
is => 'rw',
predicate => '_has_page_end',
json_ld => 'pageEnd',
);
has page_start =
manticWeb::ClassGenerator;
use v5.10;
use Moo;
use Carp;
use Const::Fast;
use HTML::Strip;
use JSON::MaybeXS;
use List::Util 1.33 qw/ any pairgrep uniqstr /;
use LWP::UserAgent;
use Markdown::Pod;
default => 't',
);
has json => (
is => 'lazy',
isa => InstanceOf [qw/ Cpanel::JSON::XS JSON JSON::PP JSON::XS /],
builder => sub {
return JSON->new->canonical->utf8->sp
or constructing the class as a JSON
# file. We can use this for debugging as well as tests.
my $test = path( $self->test_dir, 'data/classes', $filename . '.json' );
$test->parent->mkpath;
type: Contact page.
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::WebPage /;
use MooX::JSON_LD 'ContactPage';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use na
ide a place
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::StructuredValue /;
use MooX::JSON_LD 'OpeningHoursSpecification';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Ut
rw',
predicate => '_has_closes',
json_ld => 'closes',
);
has day_of_week => (
is => 'rw',
predicate => '_has_day_of_week',
json_ld => 'dayOfWeek',
);
has opens =>
> 'rw',
predicate => '_has_opens',
json_ld => 'opens',
);
has valid_from => (
is => 'rw',
predicate => '_has_valid_from',
json_ld => 'validFrom',
);
has valid_thro
nt type: Sales event.
use v5.14;
use Moo;
extends qw/ SemanticWeb::Schema::Event /;
use MooX::JSON_LD 'SaleEvent';
use Ref::Util qw/ is_plain_hashref /;
# RECOMMEND PREREQ: Ref::Util::XS
use name