Result:
found more than 757 distributions - search limited to the first 2001 files matching your query
( run in 1.013 )
AutoLoader
view release on metacpan or search on metacpan
lib/AutoSplit.pm view on Meta::CPAN
sub test6 { return join ":", __FILE__,__LINE__; }
package Yet::Another::AutoSplit;
sub testtesttesttest4_1 ($) { "another test 4\n"; }
sub testtesttesttest4_2 ($$) { "another duplicate test 4\n"; }
package Yet::More::Attributes;
sub test_a1 ($) : locked :locked { 1; }
sub test_a2 : locked { 1; }
AxKit2
view release on metacpan or search on metacpan
plugins/aio/uri_to_file view on Meta::CPAN
my ($volume, $dir, $file) = splitpath($self->config->docroot, 1);
my @path = (splitdir($dir),split(/\//,$uri));
my $i = -1;
# save these so they get locked in for the closure.
my $client = $self->client;
my $config = $self->config;
my $dirindex = $self->config('dirindex');
# $self->log(LOGCRIT, __LINE__ . " ...");
Azure-AD-Auth
view release on metacpan or search on metacpan
lib/Azure/AD/DeviceLogin.pm view on Meta::CPAN
is normally sent in the Authentication header of HTTPS requests as a Bearer token.
The call to access_token will start the Device Login flow, which involves transmitting
a message to the user (see message_handler attribute). The user will have to visit a
URL with a browser, insert the code in the message, authorize the application, and then
the authentication will proceed. Meanwhile the call to access_code will be blocked,
awaiting the user to complete the flow. Once the user completes the instructions the access_code
will be returned.
The access_token is cached in the object as long as it's valid, so subsequent calls
to access_token will return the appropriate token without reauthenticating to Azure AD.
B-C
view release on metacpan or search on metacpan
ramblings/5.22-problems.md view on Meta::CPAN
[here](https://github.com/perl11/cperl/commit/309dc8e9649acda055a86514ca334bdfea31c0f8)
and for perlall
[here](https://github.com/rurban/App-perlall/commit/4907abb6dfa86bc5d2572d523e75462a18705aec),
and my perlbug report did not get through.
I can only guess that p5p blocked me again, because they didn't like
me to call them incompetent. Blocking bug reports and fixes is worse
than just incompetence, but I got used to that recently. They blocked
my simple fix for the horrific double-readonly system, and they
proudly announced last week some
[new optimization](http://perl5.git.perl.org/perl.git/commitdiff/230ee21f3e366901ce5769d324124c522df7ce8a)
regarding faster arithmetic, but didn't have a look into
[my fast arithmetic optimizations](https://github.com/perl11/cperl/commit/8b6139a5cbb3307067daf51503fdee2771595afb)
B-DeparseTree
view release on metacpan or search on metacpan
lib/B/DeparseTree/TreeMain.pm view on Meta::CPAN
$proto .= "(". $cv->PV . ")";
}
if ($cv->CvFLAGS & (CVf_METHOD|CVf_LOCKED|CVf_LVALUE)) {
$proto .= ":";
$proto .= " lvalue" if $cv->CvFLAGS & CVf_LVALUE;
$proto .= " locked" if $cv->CvFLAGS & CVf_LOCKED;
$proto .= " method" if $cv->CvFLAGS & CVf_METHOD;
}
local($self->{'curcv'}) = $cv;
local($self->{'curcvlex'});
B-Hooks-AtRuntime
view release on metacpan or search on metacpan
get_av|5.006000|5.003007|p
getc|5.003007||Viu
get_c_backtrace|5.021001||Vi
get_c_backtrace_dump|5.021001||V
get_context|5.006000|5.006000|nu
getc_unlocked|5.003007||Viu
get_cv|5.006000|5.003007|p
get_cvn_flags|5.009005|5.003007|p
get_cvs|5.011000|5.003007|p
getcwd_sv|5.007002|5.007002|
get_db_sub|||iu
PERL_MALLOC_WRAP|5.009002|5.009002|Vn
PerlMem_calloc|5.006000||Viu
PerlMem_free|5.005000||Viu
PerlMem_free_lock|5.006000||Viu
PerlMem_get_lock|5.006000||Viu
PerlMem_is_locked|5.006000||Viu
PerlMem_malloc|5.005000||Viu
PERL_MEMORY_DEBUG_HEADER_SIZE|5.019009||Viu
PerlMemParse_calloc|5.006000||Viu
PerlMemParse_free|5.006000||Viu
PerlMemParse_free_lock|5.006000||Viu
PerlMemParse_get_lock|5.006000||Viu
PerlMemParse_is_locked|5.006000||Viu
PerlMemParse_malloc|5.006000||Viu
PerlMemParse_realloc|5.006000||Viu
PerlMem_realloc|5.005000||Viu
PerlMemShared_calloc|5.006000||Viu
PerlMemShared_free|5.006000||Viu
PerlMemShared_free_lock|5.006000||Viu
PerlMemShared_get_lock|5.006000||Viu
PerlMemShared_is_locked|5.006000||Viu
PerlMemShared_malloc|5.006000||Viu
PerlMemShared_realloc|5.006000||Viu
PERL_MG_UFUNC|5.007001||Viu
Perl_modf|5.006000|5.006000|n
PERL_MULTICONCAT_HEADER_SIZE|5.027006||Viu
putc|5.003007||Viu
put_charclass_bitmap_innards|5.021004||Viu
put_charclass_bitmap_innards_common|5.023008||Viu
put_charclass_bitmap_innards_invlist|5.023008||Viu
put_code_point|5.021004||Viu
putc_unlocked|5.003007||Viu
putenv|5.005000||Viu
put_range|5.019009||Viu
putw|5.003007||Viu
pv_display|5.006000|5.003007|p
pv_escape|5.009004|5.003007|p
BDB
view release on metacpan or search on metacpan
Per-request usage:
Each aio request uses - depending on your architecture - around 100-200
bytes of memory. In addition, stat requests need a stat buffer (possibly
a few hundred bytes), readdir requires a result buffer and so on. Perl
scalars and other data passed into aio requests will also be locked and
will consume memory till the request has entered the done state.
This is not awfully much, so queuing lots of requests is not usually a
problem.
BPM-Engine
view release on metacpan or search on metacpan
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
throw_model error =>
"Model error: no outgoing transitions for activity '$act_id'";
}
my (@instances) = ();
my (@blocked) = ();
my ($stop_following, $fired_count) = (0, 0);
my ($otherwise, $exception) = ();
# evaluate efferent transitions
foreach my $transition (@transitions) {
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
$stop_following++ if $activity->is_xor_split;
}
elsif ($activity->is_split) {
my $split = $instance->split
or die("No split for " . $activity->activity_uid);
$split->set_transition($transition->id, 'blocked');
push(@blocked, [$transition, $instance]);
}
}
elsif ($transition->condition_type eq 'OTHERWISE') {
$otherwise = $transition;
}
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
}
}
elsif ($otherwise && $activity->is_split) {
my $split = $instance->split
or die("No join found for split " . $activity->activity_uid);
$split->set_transition($otherwise->id, 'blocked');
}
# activate successor activities
my $followed_back = 0;
foreach my $inst (@instances) {
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
my $r_instance = $inst->[1];
my $r_activity = $r_instance->activity;
$self->_enqueue_ai($r_activity, $r_instance);
}
# blocked paths may trigger downstream deferred activities which must now be
# resolved; signal deferred activity instances on other branches in the
# wf-net when paths were blocked and any transition downstream was followed
if (scalar(@blocked) && $followed_back != scalar @instances) {
$self->_signal_upstream_orjoins_if_in_split_branch(@blocked);
}
return;
}
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
$self->_defer_push([$activity, $instance]) unless $deferred;
}
}
sub _signal_upstream_orjoins_if_in_split_branch {
my ($self, @blocked) = @_;
my @deferred = $self->process_instance->activity_instances->deferred->all;
foreach my $instance (@deferred) {
lib/BPM/Engine/ProcessRunner.pm view on Meta::CPAN
. $instance->activity->activity_uid
. " to deferred queue");
my $graph = $self->graph;
foreach my $block (@blocked) {
my $tr = $block->[0];
my $ai = $block->[1];
my $a_to = $tr->to_activity;
if ($graph->is_reachable($a_to->id, $instance->activity->id)) {
$self->_defer_push([$instance->activity, $instance]);
BS2000-LMS
view release on metacpan or search on metacpan
/* Description: */
/* -------------------------------------------------------------------- */
/* lock the poor man's semaphor: */
/* -------------------------------------------------------------------- */
/* Parameter: - */
/* Result : 1 if semaphor got locked, 0 otherwise */
/************************************************************************/
int lock_semaphor() /* invariant (proof for correctness): */
{
int l_iCountdown = 10; /* g_toc_semaphor >= 0 */
++g_toc_semaphor; /* g_toc_semaphor >= 1 */
BSD-Jail
view release on metacpan or search on metacpan
get_xprison($jid);
# Attach to a prison
jattach($jid);
# Create a new prision and get locked into it
jail($path, $hostname, $ipaddr);
=head1 DESCRIPTION
BSD-Process
view release on metacpan or search on metacpan
traced_by_debugger => 'traced',
waited_on_by_other => 'waited',
working_on_exiting => 'wexit',
process_called_exec => 'exec',
kernel_session_flag => 'kiflag',
is_locked => 'locked',
controlling_tty_active => 'isctty',
is_session_leader => 'issleader',
process_status => 'stat',
is_being_forked => 'stat_1',
is_runnable => 'stat_2',
is_sleeping_on_addr => 'stat_3',
is_stopped => 'stat_4',
is_a_zombie => 'stat_5',
is_waiting_on_intr => 'stat_6',
is_blocked => 'stat_7',
old_command_name => 'ocomm',
name_of_lock => 'lockname',
priority_scheduling_class => 'pri_class',
priority_level => 'pri_level',
priority_native => 'pri_native',
Time averaged value of ki_cpticks. (as per the comment in user.h,
purpose?)
=item sleep_time, slptime
Number of seconds since the process was last blocked.
=item time_last_swap, swtime
Number of seconds since the process was last swapped in or out.
=item kernel_session_flag, kiflag
A bitmap described kernel session status of the process, described
via the following attributes. B<F5+>
=item is_locked, locked
Flag indicating that the process is waiting on a lock (whose name
may be obtained from the C<lock> attribute). B<F5+>
if ($p->is_locked) {
print "$p->{comm} is waiting on lock $p->{lockname}\n";
}
else {
print "not waiting on a lock\n";
}
=item is_waiting_on_intr, stat_6
Status indicates the process is waiting for an interrupt. B<F5+>
=item is_blocked, stat_7
Status indicates the process is blocked by a lock. B<F5+>
=item nice_priority, nice
The nice value of the process. The more positive the value, the
nicer the process (that is, the less it seeks to sit on the CPU).
=item process_lock_count, lock
Process lock count. If locked, swapping is prevented.
=item run_queue_index, rqindex
When multiple processes are runnable, the run queue index shows the
order in which the processes will be scheduled to run on the CPU.
BSD-Resource
view release on metacpan or search on metacpan
Resource.pm view on Meta::CPAN
RLIMIT_DATA data size bytes
RLIMIT_STACK stack size bytes
RLIMIT_CORE coredump size bytes
RLIMIT_RSS resident set size bytes
RLIMIT_MEMLOCK memory locked data size bytes
RLIMIT_NPROC number of processes 1
RLIMIT_NOFILE number of open files 1
RLIMIT_OFILE number of open files 1
Resource.pm view on Meta::CPAN
RLIMIT_PTHREAD number of pthreads 1
RLIMIT_TCACHE maximum number of 1
cached threads
RLIMIT_AIO_MEM maximum memory locked bytes
for POSIX AIO
RLIMIT_AIO_OPS maximum number 1
for POSIX AIO ops
RLIMIT_FREEMEM portion of the total memory
BSON-XS
view release on metacpan or search on metacpan
bson/bson-atomic.h view on Meta::CPAN
# include <atomic.h>
# define bson_atomic_int_add(p,v) atomic_add_32_nv((volatile uint32_t *)p, (v))
# define bson_atomic_int64_add(p,v) atomic_add_64_nv((volatile uint64_t *)p, (v))
#elif defined(_WIN32)
/* MSVC/MinGW */
# define bson_atomic_int_add(p, v) (InterlockedExchangeAdd((volatile LONG *)(p), (LONG)(v)) + (LONG)(v))
# define bson_atomic_int64_add(p, v) (InterlockedExchangeAdd64((volatile LONGLONG *)(p), (LONGLONG)(v)) + (LONGLONG)(v))
#else
# ifdef BSON_HAVE_ATOMIC_32_ADD_AND_FETCH
# define bson_atomic_int_add(p,v) __sync_add_and_fetch((p), (v))
# else
# define __BSON_NEED_ATOMIC_32
BalanceOfPower
view release on metacpan or search on metacpan
lib/BalanceOfPower/Commands.pm view on Meta::CPAN
}
elsif($type eq 'travel')
{
if($result->{status} == -1)
{
say "Route blocked";
return 1;
}
elsif($result->{status} == -2)
{
say "Not enough movements";
Basset
view release on metacpan or search on metacpan
lib/Basset/Object.pm view on Meta::CPAN
sub lockThing {
my $self = shift;
my $thing = shift;
if ($thing->locked) {
$self->notify("info", "Cannot lock - thing is already locked");
} else {
$thing->lock();
};
return 1;
}
In this example, we have a method called "lockThing" that locks a thing (whatever that means). But it only locks the thing
if it is not already locked. If it is locked, it sends an informational message that the thing is already locked. But that's not
fatal - we still end up with a locked thing, so we're happy no matter what. No need to kick back an error.
notify is a wrapper around the notification center.
$obj->notify('foo') == Basset::NotificationCenter->postNotification('object' => $obj, 'notification' => 'foo');
Beekeeper
view release on metacpan or search on metacpan
lib/Beekeeper/Client.pm view on Meta::CPAN
$req->{_waiting_response}->begin;
}
$client->{in_progress}->{$req_id} = $req;
# Ensure that timeout is set properly when the event loop was blocked
if ($__now != CORE::time) { $__now = CORE::time; AnyEvent->now_update }
# Request timeout timer
my $timeout = $args{'timeout'} || REQ_TIMEOUT;
$req->{_timeout} = AnyEvent->timer( after => $timeout, cb => sub {
Benchmark-DKbench
view release on metacpan or search on metacpan
data/wiki2.html view on Meta::CPAN
.toc.tochidden,.toctoggle{display:none}}
.chat-join button .icon{display:inline-block;height:17px;margin-right:5px;vertical-align:middle;width:17px }.chat-join button .icon svg{fill:#fff }.WikiaRail .chat-module .chat-contents,.right-rail .chat-module .chat-contents,.right-rail .chat-module...
.ve-init-mw-tempWikitextEditorWidget{border:0;padding:0;color:inherit;line-height:1.5em;width:100%; }.ve-init-mw-tempWikitextEditorWidget:focus{outline:0;padding:0}.ve-init-mw-tempWikitextEditorWidget::selection{background:rgba(109,169,247,0.5); }
.suggestions a.mw-searchSuggest-link,.suggestions a.mw-searchSuggest-link:hover,.suggestions a.mw-searchSuggest-link:active,.suggestions a.mw-searchSuggest-link:focus{color:#000;text-decoration:none}.suggestions-result-current a.mw-searchSuggest-link...
.ve-activated .ve-init-mw-desktopArticleTarget-editableContent #toc,.ve-activated #siteNotice,.ve-activated .mw-indicators,.ve-activated #t-print,.ve-activated #t-permalink,.ve-activated #p-coll-print_export,.ve-activated #t-cite,.ve-deactivating .ve...
.oo-ui-defaultOverlay{color:var(--theme-page-text-color)}.oo-ui-icon-arrowNext,.oo-ui-icon-upTriangle,.oo-ui-icon-collapse{transform:rotate(180deg)}.oo-ui-icon-ellipsis{transform:rotate(90deg)}.oo-ui-icon-redo{transform:scaleX(-1)}.oo-ui-indicator-up...
.oo-ui-indicator-clear{-webkit-mask:url("data:image/svg+xml,%3Csvg xmlns=%22http://www.w3.org/2000/svg%22 xmlns:xlink=%22http://www.w3.org/1999/xlink%22 viewBox=%220 0 12 12%22%3E%3Cdefs%3E%3Cpath id=%22close-tiny%22 d=%22M7.426 6.001l4.278-4.279A1.0...
.oo-ui-texture-pending{background-image:url(/load.php?modules=oojs-ui.styles.textures&image=pending&format=rasterized&lang=en&skin=fandomdesktop&version=19rxowh);background-image:linear-gradient(transparent,transparent),url(data:image/gif;base64,R0lG...
.oo-ui-icon-alert,.mw-ui-icon-alert:before{-webkit-mask:url("data:image/svg+xml,%3Csvg xmlns=%22http://www.w3.org/2000/svg%22 xmlns:xlink=%22http://www.w3.org/1999/xlink%22 viewBox=%220 0 18 18%22%3E%3Cdefs%3E%3Cpath id=%22alert-small%22 d=%22M2.618 ...
.oo-ui-icon-article,.mw-ui-icon-article:before{-webkit-mask:url("data:image/svg+xml,%3Csvg viewBox=%220 0 18 18%22 xmlns=%22http://www.w3.org/2000/svg%22%3E%3Cpath d=%22M10 12v2.586L12.586 12H10zm-6 4h4v-5a1 1 0 0 1 1-1h5V2H4v14zm5 2H3a1 1 0 0 1-1-1V...
.oo-ui-icon-add,.mw-ui-icon-add:before{-webkit-mask:url("data:image/svg+xml,%3Csvg xmlns=%22http://www.w3.org/2000/svg%22 xmlns:xlink=%22http://www.w3.org/1999/xlink%22 viewBox=%220 0 18 18%22%3E%3Cdefs%3E%3Cpath id=%22add-small%22 d=%22M16 8h-6V2a1 ...
data/wiki2.html view on Meta::CPAN
(function(){function d(e){var g=$(".notifications-placeholder");if(g){var a=$('\x3cdiv class\x3d"wds-banner-notification__container" id\x3d"swm-'+e+'-container" \x3e\x3cdiv class\x3d"wds-banner-notification wds-message message"\x3e\x3cdiv class\x3d"w...
'"\x3e\x3c/span\x3e\x3cspan class\x3d"wds-banner-notification__close" id\x3d"swm-'+e+'-close"\x3e\x3csvg class\x3d"wds-icon wds-icon-tiny"\x3e\x3cuse href\x3d"#wds-icons-close-tiny"\x3e\x3c/use\x3e\x3c/svg\x3e\x3c/span\x3e\x3c/div\x3e\x3c/div\x3e');g...
action:"click",label:e+": "+this.href})})}}var h="GB",l="tv";window.ads&&window.ads.pushToConsentQueue&&window.ads.pushToConsentQueue(function(e){!e||e.geoRequiresConsent&&!e.gdprConsent||setTimeout(function(){var g=$(".sitenotice--visible");if(!g||2...
for(var b=0;b<f.length;b++){a=f[b].name;var c=f[b].verticals,m=f[b].app,k=f[b].countries;if(c&&c!==l&&!(0<=c.indexOf(l))&&"all"!==c[0]&&void 0!==c||m&&"ucp"!==m||k&&0!==k.length&&!(0<=k.indexOf(h))&&"all"!==k[0])label=JSON.stringify({name:a,verticals...
c=f[b].message;g=f[b].image;f=f[b].link;c&&0<c.length?($("#swm_bar_"+a).html(c),$("#swm-"+a+"-container").slideDown(),window.dataLayer.push({event:event_name,action:"insert-"+a,label:$("#swm_bar_"+a).text()})):g&&0<g.length?(window.dataLayer.push({ev...
f+'"\x3e'),b+="\x3cimg src\x3d'"+g+"' height\x3d'65' id\x3d'nb_image_25' class\x3d'swm-imge-tp' /\x3e",f&&0<f.length&&(b+="\x3c/a\x3e\x3c/div\x3e"),b+="\x3c/div\x3e",$("#swm-"+a+"-container").html(b),$("#swm-"+a+"-container").slideDown()):window.data...
action:"exists",label:$(".wds-banner-notification__text").text()})},2E3)})})();</script>
<script type="text/javascript" id="">(function(){window.dataLayer.push({trackingInfo:mw.config.values})})();</script><script type="text/javascript" id="">(function(dataLayer){var CATEGORY_VIDEO_PLAYER="video player";var CATEGORY_VIDEO_CONSUMPTION="vi...
var newValue=1;if(currentValue)newValue=parseInt(currentValue)+1;sessionStorage.setItem(key,newValue.toString());return newValue}function getFilename(url){if(url){var m=url.toString().match(/.*\/(.+?)\./);if(m&&m.length>1)return m[1]}return url}funct...
function getVideoViewablePageKey(){return location.href+"-video_viewable"}function getPreviousViewable(){return sessionStorage.getItem(getVideoViewablePageKey())}function setPreviousViewable(newVal){sessionStorage.setItem(getVideoViewablePageKey(),ne...
adBlocked:jwplayer.getAdBlock()});var currentVideoId=getCurrentVideoId(jwplayer);var eventLabel=currentVideoId;var allExtraParamInfo=Object.assign(jwplayer.getPlaylistItem(),extraParams);var playlist=jwplayer.getPlaylist();if(eventCategory===CATEGORY...
eventInteraction:eventLabel,videoId:currentVideoId,viewable:jwplayer.getViewable(),position:jwplayer.getPosition(),adBlocked:jwplayer.getAdBlock(),playlist:playlist,qoe:jwplayer.qoe(),relatedPlugin:relatedPlugin},allExtraParamInfo))}whenAvailable("jw...
if(article_id==="29443"&&city_id==="881799"||location.hostname==="rickandmorty.fandom.com"&&(location.pathname==="/wiki/Morty's"||location.pathname==="/wiki/Morty%27s")){this.remove();$(".featured-video__wrapper").hide();window.dataLayer.push({"event...
location.href);var viewable=jwplayer.getViewable();var adBlocked=jwplayer.getAdBlock();var currentVideoId=getCurrentVideoId(jwplayer);var eventLabel=currentVideoId+" | viewable: "+viewable+" | adBlocked: "+adBlocked;window.dataLayer.push({event:"f-ti...
player.on("meta",function(metadata){eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"meta",true,metadata)});player.on("adBlock",function(){var show_alert="undefined";if(show_alert==="true")confirm("Would you like to maybe turn off your Ad Blocker, Please...
obj.client];eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"ad-request",pipedJoin(args))});player.on("adError",function(obj){var args=[];if(obj)args=[obj.message];eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"ad-error",pipedJoin(args))});player.on("adWar...
eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"ad-impression",pipedJoin(args))});player.on("adStarted",function(obj){has_adStarted=true;var args=[];if(obj)args=[obj.creativetype,"viewable:"+obj.viewable];eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"ad-...
function(e){eventToDataLayer(this,CATEGORY_VIDEO_PLAYER,"has-ad-impression",has_adimpression+" | "+getCurrentVideoId(this)+" | "+location.href);var category,action;if(this.getPosition()<2){category=CATEGORY_VIDEO_CONSUMPTION;action="played video";var...
[pauseReason,this.getPosition()].join(" | "))});player.on("playlistItem",function(index,item){if(index&&index.index>0)eventToDataLayer(this,CATEGORY_VIDEO_INTERACTION,"played next video","index:"+index.index)});player.on("complete",function(e){eventT...
playersMarkers[playerMarkerIndex].markers.indexOf(percentPlayed)==-1){playersMarkers[playerMarkerIndex].markers.push(percentPlayed);eventToDataLayer(this,CATEGORY_VIDEO_CONSUMPTION,"played "+percentPlayed+"%")}});player.on("mute",function(state){even...
"error",e.message)})}})})(window.dataLayer=window.dataLayer||[]);</script><script type="text/javascript" id="">(function(){window.viewable_jw_events=window.viewable_jw_events||[];window.addEventListener("beforeunload",function(a){for(a=0;a<window.vie...
1].viewable){for(a=0;a<window.viewable_jw_events.length;a++)if(1===window.viewable_jw_events[a].viewable)return!1;window.dataLayer.push({event:"video other",action:"not-blocked",label:JSON.stringify({bawls:window.viewable_jw_events,length:window.view...
b.on("overlayshow",function(a){c("overlayshow"+a.action,JSON.stringify(a))});b.on("overlayhide",function(a){c("overlayhide"+a.action,JSON.stringify(a))});b.on("overlayevent",function(a){c("overlayevent"+a.action,JSON.stringify(a))});b.on("addtocart",...
<script type="text/javascript" id="">(function(){document.addEventListener("mouseup",function(){var a=document.getSelection().toString();a.length&&window.dataLayer.push({event:"text selections",action:"mouseup",label:a})})})();</script><script type="...
h+"/"+d+".js";b=b.getElementsByTagName("script")[0];b.parentNode.insertBefore(a,b)}}(window,document,"HqwtSkY9p1BWoR1Z","delightedNps2"),delightedNps2.survey({properties:{loginStatus:"anon",wgContentLanguage:"en",vertical:"tv",wikiaPageIsCorporate:"N...
.swm-image-wrap {
height: 65px;
data/wiki2.html view on Meta::CPAN
(function(){function d(e){var g=$(".notifications-placeholder");if(g){var a=$('\x3cdiv class\x3d"wds-banner-notification__container" id\x3d"swm-'+e+'-container" \x3e\x3cdiv class\x3d"wds-banner-notification wds-message message"\x3e\x3cdiv class\x3d"w...
'"\x3e\x3c/span\x3e\x3cspan class\x3d"wds-banner-notification__close" id\x3d"swm-'+e+'-close"\x3e\x3csvg class\x3d"wds-icon wds-icon-tiny"\x3e\x3cuse href\x3d"#wds-icons-close-tiny"\x3e\x3c/use\x3e\x3c/svg\x3e\x3c/span\x3e\x3c/div\x3e\x3c/div\x3e');g...
action:"click",label:e+": "+this.href})})}}var h="GB",l="tv";window.ads&&window.ads.pushToConsentQueue&&window.ads.pushToConsentQueue(function(e){!e||e.geoRequiresConsent&&!e.gdprConsent||setTimeout(function(){var g=$(".sitenotice--visible");if(!g||2...
for(var b=0;b<f.length;b++){a=f[b].name;var c=f[b].verticals,m=f[b].app,k=f[b].countries;if(c&&c!==l&&!(0<=c.indexOf(l))&&"all"!==c[0]&&void 0!==c||m&&"ucp"!==m||k&&0!==k.length&&!(0<=k.indexOf(h))&&"all"!==k[0])label=JSON.stringify({name:a,verticals...
c=f[b].message;g=f[b].image;f=f[b].link;c&&0<c.length?($("#swm_bar_"+a).html(c),$("#swm-"+a+"-container").slideDown(),window.dataLayer.push({event:event_name,action:"insert-"+a,label:$("#swm_bar_"+a).text()})):g&&0<g.length?(window.dataLayer.push({ev...
f+'"\x3e'),b+="\x3cimg src\x3d'"+g+"' height\x3d'65' id\x3d'nb_image_25' class\x3d'swm-imge-tp' /\x3e",f&&0<f.length&&(b+="\x3c/a\x3e\x3c/div\x3e"),b+="\x3c/div\x3e",$("#swm-"+a+"-container").html(b),$("#swm-"+a+"-container").slideDown()):window.data...
action:"exists",label:$(".wds-banner-notification__text").text()})},2E3)})})();</script><script async="" type="text/javascript" src="./Star Trek _ Memory Alpha _ Fandom_files/cs.js"></script>
<div class="modal-js-window oo-ui-windowManager oo-ui-windowManager-modal" aria-hidden="true"><div id="show-discord-user" class="oo-ui-window oo-ui-element-hidden oo-ui-dialog oo-ui-processDialog" role="dialog" aria-labelledby="ooui-1"><div class="oo...
</iframe><iframe sandbox="allow-scripts allow-same-origin" id="101fc5e1ade4bafe" frameborder="0" allowtransparency="true" marginheight="0" marginwidth="0" width="0" hspace="0" vspace="0" height="0" style="height:0px;width:0px;display:none;" scrol...
</iframe><iframe sandbox="allow-scripts allow-same-origin" id="10207f4bfdddef7a" frameborder="0" allowtransparency="true" marginheight="0" marginwidth="0" width="0" hspace="0" vspace="0" height="0" style="height:0px;width:0px;display:none;" scrol...
</iframe><iframe sandbox="allow-scripts allow-same-origin" id="1039cf816cea59c3" frameborder="0" allowtransparency="true" marginheight="0" marginwidth="0" width="0" hspace="0" vspace="0" height="0" style="height:0px;width:0px;display:none;" scrol...
Benchmark-Perl-Formance-Cargo
view release on metacpan or search on metacpan
share/PerlCritic/Critic/Policy/Variables/RequireLexicalLoopIterators.pm view on Meta::CPAN
last;
}
}
if ( $bicycle and $bicycle->is_unlocked() ) {
ride_home($bicycle);
}
which is not going to allow you to arrive in time for dinner with your
family because the C<$bicycle> outside the loop is different from the
BerkeleyDB-Lite
view release on metacpan or search on metacpan
my $key = shift ;
my $value = "" ;
my @values = () ;
# database locked
my $cursor = $self->db_cursor ;
if ( $cursor->c_get( $key, $value, DB_SET ) ) {
$cursor = undef ;
return @values ;
my @each = () ;
return [] unless $partkey ;
my $length = length $partkey ;
# database locked
my $cursor = $self->db_cursor ;
my $value = 0 ;
my $key = $partkey ;
my $status = $cursor->c_get( $key, $value, DB_SET_RANGE ) ;
BerkeleyDB-Locks
view release on metacpan or search on metacpan
&lobj->waiters, __db_lock ) ;
wlp ;
wlp = SH_TAILQ_NEXT(
wlp, links, __db_lock )
) {
/* Each waiter on a locked object represents a separate
* lock condition:
*/
av = newAV() ;
// waiter
av_push( av, newSViv( R_OFFSET(
BerkeleyDB
view release on metacpan or search on metacpan
BerkeleyDB.pod view on Meta::CPAN
locks on the database. Default 1000. This is often lower than required.
=item -MaxObjects
If present, this parameter is used to configure the maximum number of
locked objects. Default 1000. This is often lower than required.
=item -SharedMemKey
If present, this parameter sets the base segment ID for the shared memory
region used by Berkeley DB.
BerkeleyDB.pod view on Meta::CPAN
Removes a CDS lock. The destruction of the CDS lock object automatically
calls this method.
Note that if multiple CDS lock objects are created, the underlying write
lock will not be released until all CDS lock objects are either explicitly
unlocked with this method, or the CDS lock objects have been destroyed.
=head2 $ref = $db->db_stat()
Returns a reference to an associative array containing information about
the database. The keys of the associative array correspond directly to the
BerkeleyDB.pod view on Meta::CPAN
Here's the problem - there is nothing to stop two (or more) processes
executing the read part at the same time. Remember multiple processes can
hold a read lock on the database at the same time. So both will fetch the
same value, let's say 7, from the database. Both increment the value to 8
and attempt to write it to the database. Berkeley DB will ensure that only
one of the processes gets a write lock, while the other will be blocked. So
the process that happened to get the write lock will store the value 8 to
the database and release the write lock. Now the other process will be
unblocked, and it too will write the value 8 to the database. The result,
in this example, is we have missed a hit in the counter.
To deal with this kind of scenario, you need to make the update atomic. A
convenience method, called C<cds_lock>, is supplied with the BerkeleyDB
module for this purpose. Using C<cds_lock>, the counter update code can now
BerkeleyDB.pod view on Meta::CPAN
within a single process, that process will hold a write-lock on the
database until I<ALL> C<cds_lock> objects have been destroyed.
As with all write-cursors, you should try to limit the scope of the
C<cds_lock> to as short a time as possible. Remember the complete database
will be locked to other process whilst the write lock is in place.
=head2 Cannot write with a read cursor while a write cursor is active
This issue is easier to demonstrate with an example, so consider the code
below. The intention of the code is to increment the values of all the
BerkeleyDB.pod view on Meta::CPAN
To implement the "each" functionality, a read cursor will be created behind
the scenes to allow you to iterate through the tied hash, C<%hash>. While
that cursor is still active, a read lock will obviously be held against the
database. If your application has any other writing processes, these will
be blocked until the read cursor is closed. That won't happen until the
loop terminates.
To avoid blocking problems, only keep cursors open as long as they are
needed. The same is true when you use the C<cursor> method or the
C<cds_lock> method.
Bib-CrossRef
view release on metacpan or search on metacpan
lib/Bib/CrossRef.pm view on Meta::CPAN
e.g. author and journal
$ref->parse_text('Alessandro Checco, Douglas J. Leith, IEEE Journal of Selected Topics in Signal Processing, 7(5)');
Please bear in mind that crossref provides a great service for free -- don't abuse it by making excessive queries. If making many queries, be
sure to rate limit them to a sensible level or you will likely get blocked.
=head1 METHODS
=head2 new
Biblio-Zotero-DB
view release on metacpan or search on metacpan
lib/Biblio/Zotero/DB/Role/CopyDB.pm view on Meta::CPAN
$db->schema; # this will use a copy of the database file
=head1 DESCRIPTION
It is likely to that you might have Zotero open while using
L<Biblio::Zotero::DB>. This causes problems as the database file will be locked
as long as Zotero is running. To get around that, applying this role will
create a copy whenever the C<L<schema|Biblio::Zotero::DB/schema>> attribute of L<Biblio::Zotero::DB> is
built.
=head1 ATTRIBUTES
Big5
view release on metacpan or search on metacpan
lib/Big5.pm view on Meta::CPAN
=back
=head1 Environment Variable
This software uses the flock function for exclusive control. The execution of the
program is blocked until it becomes possible to read or write the file.
You can have it not block in the flock function by defining environment variable
CHAR_NONBLOCK.
Example:
Big5HKSCS
view release on metacpan or search on metacpan
lib/Big5HKSCS.pm view on Meta::CPAN
=back
=head1 Environment Variable
This software uses the flock function for exclusive control. The execution of the
program is blocked until it becomes possible to read or write the file.
You can have it not block in the flock function by defining environment variable
CHAR_NONBLOCK.
Example:
Binance-API
view release on metacpan or search on metacpan
lib/Binance/API.pm view on Meta::CPAN
"updateTime": 123456789,
"balances": [
{
"asset": "BTC",
"free": "4723846.89208129",
"locked": "0.00000000"
},
{
"asset": "LTC",
"free": "4763368.68006011",
"locked": "0.00000000"
}
]
}
=cut
Bio-Community
view release on metacpan or search on metacpan
lib/Bio/Community/Role/Locked.pm view on Meta::CPAN
# You may distribute this module under the same terms as perl itself
=head1 NAME
Bio::Community::Role::Locked - Role for objects that can be locked (made read-only)
=head1 SYNOPSIS
package My::Package;
lib/Bio/Community/Role/Locked.pm view on Meta::CPAN
=head1 DESCRIPTION
This role provides the capability to make objects of the class that consumes this
role read-only. The lock() method can be invoked to make an object read-only,
while unlock() restores the read/write properties of the object. If you try to
call a method to modify an object that is locked or otherwise attempt to change
its hash, you will get an error similar to this:
Modification of a read-only value attempted at accessor Bio::Community::Member::foo
=head1 AUTHOR
Bio-DB-GFF
view release on metacpan or search on metacpan
lib/Bio/DB/GFF.pm view on Meta::CPAN
Returns : current value of lock-on-load flag
Args : new value of lock-on-load-flag
Status : Public
This method is honored by some of the adaptors. If the value is true,
the tables used by the GFF modules will be locked for writing during
loads and inaccessible to other processes.
=cut
sub lock_on_load {
Bio-DB-NCBIHelper
view release on metacpan or search on metacpan
lib/Bio/DB/NCBIHelper.pm view on Meta::CPAN
Title : delay_policy
Usage : $secs = $self->delay_policy
Function: NCBI requests a delay of 4 seconds between requests unless email is
provided. This method implements a 4 second delay; use 'delay()' to
override, though understand if no email is provided we are not
responsible for users being IP-blocked by NCBI
Returns : number of seconds to delay
Args : none
=cut
Bio-EnsEMBL
view release on metacpan or search on metacpan
lib/Bio/EnsEMBL/Utils/ConversionSupport.pm view on Meta::CPAN
return 1;
}
=head2 unlock_log
Description : Unlock log previously locked by lock_log.
=cut
sub unlock_log {
my ($self) = @_;
( run in 1.013 second using v1.01-cache-2.11-cpan-49f99fa48dc )