view release on metacpan or search on metacpan
lib/Treex/Block/W2A/EN/FixTagsAfterParse.pm view on Meta::CPAN
return;
}
sub process_start {
my $self = shift;
my $file_path = require_file_from_share($TAGS_FILE);
open my $IN, '<:encoding(utf8)', $file_path or log_fatal $!;
while (<$IN>) {
chomp;
my ( $form, @tags ) = split /\t/, $_;
foreach my $tag (@tags) {
view release on metacpan or search on metacpan
lib/Treex/Tool/Parser/JDEPP.pm view on Meta::CPAN
sub BUILD {
my ($self) = @_;
# TODO find architecture independent solution
my $bin_path = require_file_from_share(
'installed_tools/parser/jdepp/bin/jdepp',
ref($self)
);
#TODO: fix setting up of the model_dir via Treex (see W2A::JA::ParseJDEPP)
view release on metacpan or search on metacpan
lib/Treex/Block/W2A/ParseMSTperl.pm view on Meta::CPAN
$parser->load_model($model_file);
if ( $self->additional_model_from_share ) {
if ( $config->use_pmi) {
my $filename = $self->model_dir . '/' . $config->pmi_model_file;
my $loaded_filename = require_file_from_share( $filename, ref($self) );
$config->pmi_model_file($loaded_filename);
}
if ( $config->use_cprob) {
my $filename = $self->model_dir . '/' . $config->cprob_model_file;
my $loaded_filename = require_file_from_share( $filename, ref($self) );
$config->cprob_model_file($loaded_filename);
}
}
# filenames in config have been changed -- can now load
view release on metacpan or search on metacpan
share/static/index.js.map view on Meta::CPAN
{"version":3,"sources":["webpack:///index.js","webpack:///webpack/bootstrap 5eb2d13f2f5004dfb730","webpack:///./~/css-loader/lib/css-base.js","webpack:///./~/style-loader/addStyles.js","webpack:///./~/d3/d3.js","webpack:///./~/jquery/dist/jquery.js",...
view release on metacpan or search on metacpan
[Prereqs / TestRequires]
Moo = 1.006000
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[GitHub::Meta]
repo = git://github.com/robrwo/Types-Const.git
view release on metacpan or search on metacpan
[Prereqs]
version = 0.77
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[GitHub::Meta]
repo = git://github.com/robrwo/Types-SQL.git
view release on metacpan or search on metacpan
script/nav_data_dump.js view on Meta::CPAN
*/
var packet = "88776655d004800f346f000001000000000094000000020059000000bf4ccccd00209ec400941a47000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000030000000e4f...
var packet_buf = new Buffer( packet, "hex" );
var parseNavData = require( "parseNavdata" );
var navdata = parseNavData( packet_buf );
console.log( navdata );
view release on metacpan or search on metacpan
scripts/nav_data_dump.js view on Meta::CPAN
*
*/
var packet = "88776655f504800fb51700000100000000009400000003004c0000000000b8c20000dcc30030654616020000c73d86431d4143c300000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000003000000e53b...
var packet_buf = new Buffer( packet, "hex" );
var parseNavData = require( "parseNavdata" );
var navdata = parseNavData( packet_buf );
console.log( navdata );
view release on metacpan or search on metacpan
src/googleurl/src/url_canon_icu.cc view on Meta::CPAN
output->set_length(begin_offset + required_capacity);
return;
}
// Output didn't fit, expand
dest_capacity = required_capacity;
output->Resize(begin_offset + dest_capacity);
} while (true);
}
// Converts the Unicode input representing a hostname to ASCII using IDN rules.
view release on metacpan or search on metacpan
udpipe/udpipe.cpp view on Meta::CPAN
}
// Compute error vector
w.error_outcomes.resize(outcomes_size);
for (unsigned i = 0; i < outcomes_size; i++)
w.error_outcomes[i] = (i == required_outcome) - w.outcomes[i];
// Backpropagate error_outcomes to error_hidden
w.error_hidden.assign(hidden_layer_size, 0);
for (auto&& i : w.hidden_kept)
for (unsigned j = 0; j < outcomes_size; j++)
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
lib/Valence.pm view on Meta::CPAN
=head2 BROWSER TO PERL
In order for the browser to send a message to your perl code, it should execute something like the following javascript code:
var ipcRenderer = require('electron').ipcRenderer;
ipcRenderer.send('my-event', 'my message');
On the perl side, you receive these messages like so:
my $ipcMain = $electron->attr('ipcMain');
lib/Valence.pm view on Meta::CPAN
my $web_contents = $main_window->attr('webContents');
$web_contents->send('my-event' => 'my message');
And the javascript side can receive these messages like so:
var ipcRenderer = require('electron').ipcRenderer;
ipcRenderer.on('my-event', function(event, message) {
console.log(message); // prints 'my message'
});
=head2 IPC READY EVENTS
view release on metacpan or search on metacpan
lib/WWW/Mechanize/PhantomJS.pm view on Meta::CPAN
sub document {
$_[0]->driver->find_element('html','tag_name');
}
# If things get nasty, we could fall back to PhantomJS.webpage.plainText
# var page = require('webpage').create();
# page.open('http://somejsonpage.com', function () {
# var jsonSource = page.plainText;
sub decoded_content {
$_[0]->driver->get_page_source
};
view release on metacpan or search on metacpan
wasm3/platforms/emscripten_lib/run_native.js view on Meta::CPAN
'use strict';
if (typeof(process) != 'undefined') { // Node.js environment?
var scriptArgs = process.argv.slice(2);
const fs = require('fs');
var readFile = (fn) => new Uint8Array(fs.readFileSync(fn));
} else {
var readFile = (fn) => read(fn, 'binary');
}
view release on metacpan or search on metacpan
[Prereqs]
FFI::Platypus::Type::PtrObject = 0.02
[DynamicPrereqs / AlienWasmtime]
-condition = do { use FFI::CheckLib 0.26; !find_lib lib => 'wasmtime', symbol => ['wasmtime_func_as_funcref'] }
-body = requires('Alien::wasmtime', '0.17')
[Author::Plicease::Upload]
cpan = 1
[InsertExample]
view release on metacpan or search on metacpan
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/external/globalize.culture.de-DE.js view on Meta::CPAN
if ( typeof require !== "undefined"
&& typeof exports !== "undefined"
&& typeof module !== "undefined" ) {
// Assume CommonJS
Globalize = require( "globalize" );
} else {
// Global variable
Globalize = window.Globalize;
}
view release on metacpan or search on metacpan
my $psgi = shift or usage();
my $method = shift or usage();
my $url = shift or usage();
my $app = require $psgi;
my $request = HTTP::Request->new($method, $url);
$request->header(%headers);
$request->dump(maxlength => 2000);
view release on metacpan or search on metacpan
examples/rotatingCube.pl view on Meta::CPAN
use Math::Trig qw/:pi tan/;
use Math::3Space qw/space vec3 perspective_projection/;
use FindBin qw/$Bin $Script/;
my $cube = require "$Bin/$Script.cube.pl";
my $wgpu = WebGPU::Direct->new;
my $width = 600;
my $height = 600;
view release on metacpan or search on metacpan
[Prereqs / TestNeeds]
-phase = test
Import::Into = 1.002003
[DynamicPrereqs]
-body = requires('JSON::XS', '4.02') if has_module('JSON::XS', '4.01') or !defined has_module('JSON::XS', '4.01');
view release on metacpan or search on metacpan
use strict;
use warnings;
use Test::More;
my $boss = require 't/prologue.pl';
is $boss->http_response, undef;
my $search = $boss->Web( q => 'sushi' );
isa_ok( $search, 'WebService::Yahoo::BOSS::Response' );
view release on metacpan or search on metacpan
share/web_page.js view on Meta::CPAN
WebPage.COMMANDS = ['currentUrl', 'find', 'nodeCall', 'documentSize'];
function WebPage(_native) {
var callback, _i, _len, _ref;
this["native"] = _native;
this["native"] || (this["native"] = require('webpage').create());
this._source = "";
this._errors = [];
this._networkTraffic = {};
this.frames = [];
this.sub_pages = {};
view release on metacpan or search on metacpan
EnumPrinters.xs view on Meta::CPAN
}
XSRETURN(items);
}
else {
if (required > buffer_size) {
buffer_size = required;
continue;
}
XSRETURN(0);
}
}
EnumPrinters.xs view on Meta::CPAN
XPUSHs(sv);
}
}
else {
if (required > buffer_size) {
buffer_size = required;
continue;
}
}
break;
}
view release on metacpan or search on metacpan
BOOL TryMapAndLoad (PCSTR name, PCSTR path, PLOADED_IMAGE loadedImage, int requiredMachineType)
{
BOOL success = MapAndLoad (name, path, loadedImage, FALSE, TRUE);
if (!success && GetLastError () == ERROR_FILE_NOT_FOUND)
success = MapAndLoad (name, path, loadedImage, TRUE, TRUE);
if (success && requiredMachineType != -1 && (int)loadedImage->FileHeader->FileHeader.Machine != requiredMachineType)
{
UnMapAndLoad (loadedImage);
return FALSE;
}
return success;
view release on metacpan or search on metacpan
eg/ProcessInfo.pl view on Meta::CPAN
usage: perl ProcInfo.pl [options] [pid ...]
where the allowed options are:
-b = brief (PIDs only - uses ListPids, not GetProcInfo)
-c = elapsed times in clunks (100-nanosecond intervals)
-d = formatted dates where applicable
-e = require an <Enter> to exit
-l = slow (lethargic)
-mx = report on machine x (valid only with variant WMI)
-nx = report on process name x (case-insensitive)
-p = pulist output
-rn = number of repeats to do
view release on metacpan or search on metacpan
cpp/overload.cpp view on Meta::CPAN
if( required != -1 )
{
if( allow_more && argc < required )
{ PUSHMARK(MARK); return false; }
if( !allow_more && argc != required )
{ PUSHMARK(MARK); return false; }
}
else if( argc < int(prototype.count) )
{ PUSHMARK(MARK); return false; }
view release on metacpan or search on metacpan
Bootstrap.PL view on Meta::CPAN
mkdir $DATA, 0777 unless -d $DATA;
XML::Edifact::open_dbm( $DATA, O_RDWR|O_CREAT );
#------------------------------------------------------------------------------#
$run=File::Spec->catdir("boot","segment.run"); $req_ok = require $run;
$run=File::Spec->catdir("boot","composite.run"); $req_ok = require $run;
$run=File::Spec->catdir("boot","element.run"); $req_ok = require $run;
$run=File::Spec->catdir("boot","annex_b.run"); $req_ok = require $run;
$run=File::Spec->catdir("boot","codes.run"); $req_ok = require $run;
$run=File::Spec->catdir("boot","dtd.run"); $req_ok = require $run;
#------------------------------------------------------------------------------#
XML::Edifact::close_dbm( );
view release on metacpan or search on metacpan
hax/make_argcheck_ops.c.inc view on Meta::CPAN
#endif
#define make_argcheck_ops(required, optional, slurpy, subname) S_make_argcheck_ops(aTHX_ required, optional, slurpy, subname)
static OP *S_make_argcheck_ops(pTHX_ int required, int optional, char slurpy, SV *subname)
{
int params = required + optional;
#ifdef HAVE_OP_ARGCHECK
UNOP_AUX_item *aux = make_argcheck_aux(params, optional, slurpy);
return op_prepend_elem(OP_LINESEQ, newSTATEOP(0, NULL, NULL),
hax/make_argcheck_ops.c.inc view on Meta::CPAN
OP *ret = NULL;
if(required > 0) {
SV *message = newSVpvf("Too few arguments for subroutine '%" SVf "'", subname);
/* @_ >= required or die ... */
OP *checkop =
newSTATEOP(0, NULL,
newLOGOP(OP_OR, 0,
newBINOP(OP_GE, 0,
/* scalar @_ */
view release on metacpan or search on metacpan
libdwarf-code-0.11.1/src/bin/dwarfdump/print_die.c view on Meta::CPAN
}
if (required_tag) {
required_tag_name = get_TAG_name(required_tag,FALSE);
}
actual_tag_name = get_TAG_name(tag,FALSE);
if (required_tag && tag != required_tag) {
esb_append_printf_s(string_out,
"ERROR: %s incorrect target die tag ",
op_name);
esb_append_printf_s(string_out,
" Tag required: %s",required_tag_name);
view release on metacpan or search on metacpan
range-v3-0.12.0/include/meta/meta_fwd.hpp view on Meta::CPAN
template <typename T, typename U>
META_CONCEPT same_as =
META_CONCEPT_BARRIER(META_IS_SAME(T, U));
template <template <typename...> class C, typename... Ts>
META_CONCEPT valid = requires
{
typename C<Ts...>;
};
template <typename T, template <T...> class C, T... Is>
META_CONCEPT valid_i = requires
{
typename C<Is...>;
};
template <typename T>
META_CONCEPT trait = requires
{
typename T::type;
};
template <typename T>
META_CONCEPT invocable = requires
{
typename quote<T::template invoke>;
};
template <typename T>
META_CONCEPT list_like = is_v<T, list>;
// clang-format off
template <typename T>
META_CONCEPT integral = requires
{
typename T::type;
typename T::value_type;
typename T::type::value_type;
}