view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Data::Sah::Compiler::perl::TH::array" : "0.911",
            "Data::Sah::Compiler::perl::TH::bool" : "0.911",
            "Data::Sah::Compiler::perl::TH::int" : "0.911",
            "Data::Sah::Compiler::perl::TH::re" : "0.911",
            "Data::Sah::Compiler::perl::TH::str" : "0.911",
            "Data::Sah::Filter::perl::Path::expand_tilde_when_on_unix" : "0",
            "Data::Sah::Filter::perl::Path::strip_slashes_when_on_unix" : "0",
            "File::Path" : "0",
            "IPC::System::Options" : "0.339",
            "List::MoreUtils" : "0",
            "Log::ger" : "0.038",

 view release on metacpan or  search on metacpan

lib/App/NDTools/NDProc.pm  view on Meta::CPAN

sub embed {
    my ($self, $data, $path, $thing) = @_;

    my $spath = eval { str2path($path) };
    die_fatal "Unable to parse '$path' ($@)", 4 if ($@);
    my $ref = eval { (path($data, $spath, expand => 1))[0]};
    die_fatal "Unable to lookup '$path' ($@)", 4 if ($@);

    ${$ref} = $self->{OPTS}->{'builtin-format'} eq 'RAW'
        ? $thing
        : s_encode($thing, $self->{OPTS}->{'builtin-format'}, {pretty => 0});

 view release on metacpan or  search on metacpan

lib/App/Netdisco/DB/ResultSet.pm  view on Meta::CPAN

=head2 get_datatables_data( $params )

Returns a ResultSet for DataTables Server-side processing which populates
the displayed table.  Evaluates the supplied query parameters for filtering,
paging, and ordering information.  Note: query parameters are expected to be
passed as a reference to an expanded hash of hashes.

Filtering if present, will generate simple LIKE matching conditions for each
searchable column (searchability indicated by query parameters) after each
column is casted to text.  Conditions are combined as disjunction (OR).
Note: this does not match the built-in DataTables filtering which does it

lib/App/Netdisco/DB/ResultSet.pm  view on Meta::CPAN

Returns the total records, after filtering (i.e. the total number of
records after filtering has been applied - not just the number of records
being returned for this page of data) for a datatables ResultSet and
query parameters.  Note: query parameters are expected to be passed as a
reference to an expanded hash of hashes.

=cut

sub get_datatables_filtered_count {
    my $rs     = shift;