view release on metacpan or search on metacpan
share/resources/public/swagger-ui/swagger-ui-bundle.js view on Meta::CPAN
*
* Copyright (c) Facebook, Inc. and its affiliates.
*
* This source code is licensed under the MIT license found in the
* LICENSE file in the root directory of this source tree.
*/Object.defineProperty(t,"__esModule",{value:!0});var r="function"==typeof Symbol&&Symbol.for,o=r?Symbol.for("react.element"):60103,i=r?Symbol.for("react.portal"):60106,a=r?Symbol.for("react.fragment"):60107,s=r?Symbol.for("react.strict_mode"):6010...
/*!
* https://github.com/Starcounter-Jack/JSON-Patch
* (c) 2017 Joachim Wester
* MIT license
*/
view release on metacpan or search on metacpan
t/020_simple.t view on Meta::CPAN
is $self->vparam( str4 => qr{^(www)$}, default => 'abc' ),
'abc', 'str4 default';
is $self->verror('str4'), 0, 'str4 no error';
is $self->vparam(
str5 => qr{^(online_)?(all|free|busy|auto)$},
default => 'all',
), 'auto', 'str5 regexp';
is $self->verror('str5'), 0,
'str5 no error, set default';
view release on metacpan or search on metacpan
lib/Monitoring/GLPlugin.pm view on Meta::CPAN
sub schimpf {
my ($self) = @_;
printf "statefilesdir %s is not writable.\nYou didn't run this plugin as root, didn't you?\n", $self->statefilesdir();
}
# $self->protect_value('1.1-flat_index', 'cpu_busy', 'percent');
sub protect_value {
my ($self, $ident, $key, $validfunc) = @_;
if (ref($validfunc) ne "CODE" && $validfunc eq "percent") {
$validfunc = sub {
my $value = shift;
view release on metacpan or search on metacpan
lib/MooX/Async/Console/TCP.pm view on Meta::CPAN
use namespace::clean '__line';
sub __on_line {
my $self = shift;
my $client = shift;
my ($cmd, @args) = split ' ', shift;
my $state; # for now - false nothing, true busy;
die 'One command at a time for now' if $state;
$state++;
my $quit;
$self->_logger->debugf('Received command %s %s', $cmd, \@args);
view release on metacpan or search on metacpan
lib/MooX/Types/CLike.pm view on Meta::CPAN
=head2 Internet Relay Chat
You can get live help by using IRC ( Internet Relay Chat ). If you don't know what IRC is,
please read this excellent guide: L<http://en.wikipedia.org/wiki/Internet_Relay_Chat>. Please
be courteous and patient when talking to us, as we might be busy or sleeping! You can join
those networks/channels and get help:
=over 4
=item *
view release on metacpan or search on metacpan
lib/Moonshine/Element.pm view on Meta::CPAN
headers height hidden high href hreflang http_equiv icon id integrity ismap itemprop keytype
kind label lang language list loop low manifest max maxlength media method min multiple muted
name novalidate open optimum pattern ping placeholder poster preload radiogroup readonly rel
required reversed rows rowspan sandbox scope scoped seamless selected shape size sizes span
spellcheck src srcdoc srclang srcset start step style summary tabindex target title type usemap
value width wrap aria_autocomplete aria_atomic aria_busy aria_checked aria_controls
aria_disabled aria_dropeffect aria_flowto aria_grabbed aria_expanded aria_haspopup aria_hidden
aria_invalid aria_label aria_labelledby aria_live aria_level aria_multiline aria_multiselectable
aria_orientation aria_pressed aria_readonly aria_required aria_selected aria_sort aria_valuemax
aria_valuemin aria_valuenow aria_valuetext aria_owns aria_relevant role data_toggle data_target
aria_describedby onkeyup onkeydown onclick onchange/;
view release on metacpan or search on metacpan
t/160-valid_attributes_for_tag.t view on Meta::CPAN
'onwaiting',
'spellcheck',
'aria-activedescendant',
'aria-atomic',
'aria-autocomplete',
'aria-busy',
'aria-checked',
'aria-controls',
'aria-describedby',
'aria-disabled',
'aria-dropeffect',
t/160-valid_attributes_for_tag.t view on Meta::CPAN
'onwaiting',
'spellcheck',
'aria-activedescendant',
'aria-atomic',
'aria-autocomplete',
'aria-busy',
'aria-checked',
'aria-controls',
'aria-describedby',
'aria-disabled',
'aria-dropeffect',
view release on metacpan or search on metacpan
lib/MozRepl/RemoteObject.pm view on Meta::CPAN
Note that you cannot block the execution of Javascript that way.
The Javascript code has long continued running when you receive
the event.
Currently, only busy-waiting is implemented and there is no
way yet for Javascript to tell Perl it has something to say.
So in absence of a real mainloop, you have to call
$repl->poll;
view release on metacpan or search on metacpan
lib/Mozilla/Mechanize/GUITester.pm view on Meta::CPAN
}
}
$self->_N("_countdown_requests finish");
}
sub _wait_while_busy {
my $self = shift;
$self->_countdown_requests;
$self->{$_} = undef for qw(forms cur_form links images);
return 1;
}
view release on metacpan or search on metacpan
lib/Mozilla/Mechanize.pm view on Meta::CPAN
# XXX: how to add headers?
# $agent->navigate({ URL => $uri->as_string,
# Headers => $self->_extra_headers($uri) });
$agent->embedded->load_url($uri->as_string);
$self->_wait_while_busy;
}
=head2 $moz->reload()
Reload the page.
=cut
sub reload {
$_[0]->agent->embedded->reload('reloadnormal');
$_[0]->_wait_while_busy;
}
=head2 $moz->back()
Go back a page in the browser history.
=cut
sub back {
$_[0]->agent->embedded->go_back;
$_[0]->_wait_while_busy;
}
=head1 STATUS METHODS
=head2 $moz->success
lib/Mozilla/Mechanize.pm view on Meta::CPAN
$self->{images} = \@images;
return wantarray ? @{ $self->{forms} } : $self->{forms};
}
}
=head2 $self->_wait_while_busy()
This adds a "single-shot" idle callback that does Gtk2->main_quit,
then does Gtk2->main. The result is that whenever the UI becomes idle
it will exit the main loop. Thanks to muppet for the idea.
This is repeated until the net_stop event fires, indicating that
the new page has finished loading. (Note therefore that you can only
call this when you expect a new page to load.)
=cut
sub _wait_while_busy {
my $self = shift;
my $agent = $self->agent;
do {
Glib::Idle->add(sub {
view release on metacpan or search on metacpan
test_data/README view on Meta::CPAN
might be relevant. You can of course also send patches to
actual bugs.
Mention the word "XBase" in the Subject line, otherwise your
post will probably just slip through my 1 MB daily email load
without even being read. Please note that I'm _very_ busy, so
try to help me to help you by using the latest version of the
module, minimalizing the script code that causes you problems,
providing me with tiny sample of datafile, anything that might
be related. Detailed description and small examples are the
best.
view release on metacpan or search on metacpan
htdocs/src-min/mode-php.js view on Meta::CPAN
define("ace/mode/doc_comment_highlight_rules",["require","exports","module","ace/lib/oop","ace/mode/text_highlight_rules"],function(e,t,n){"use strict";var r=e("../lib/oop"),i=e("./text_highlight_rules").TextHighlightRules,s=function(){this.$rules={s...
view release on metacpan or search on metacpan
bin/myriad-migrate-rpc-streams.pl view on Meta::CPAN
try {
await $redis->xgroup('CREATE', $old_rpc_stream, 'rpc_migration', 0);
} catch ($e) {
if ($e =~ /BUSYGROUP/) {
$log->fatalf('Got a busygroup for stream %s are you running another migration?', $old_rpc_stream);
} else {
$log->fatalf('Failed to create group for stream %s - %s', $old_rpc_stream, $e);
}
exit 1;
}
view release on metacpan or search on metacpan
lib/Net/MythTV/Fuse/Recordings.pm view on Meta::CPAN
-13 => "Other recording",
-12 => "Other tuning",
-11 => "Backend not running",
-10 => "The showing is being tuned",
-9 => "The recorder failed to record",
-8 => "The tuner card was busy",
-7 => "Low disk space",
-6 => "Manual cancel",
-5 => "Missed recording",
-4 => "Aborted",
-3 => "Recorded",
view release on metacpan or search on metacpan
```
For more detailed information on the available methods and options, please refer to the individual documentation of the NBI::Job and NBI::Opts classes.
Automatic tests check the functionality of the classes and methods even when Slurm is not available. From the cluster where NBI::Slurm
will be used, it's possible to run `prove -lv xt/hpc-*.t` to test the ability to submit jobs (but some tests might fail for busy partitions, drain, etc).
## Author
[NBI::Slurm](https://metacpan.org/dist/NBI-Slurm) is written by [Andrea Telatin](https://telatin.github.io)
view release on metacpan or search on metacpan
my $op = $job->operation;
if ($opts{'x'}) {
print " operation=\"$op\" elapsed=\"".dispInterval($job->elapsedTime)."\"";
}
else {
print " $op ".dispInterval($job->busy);
}
}
if ($state ne "Q") {
if (defined($job->filesWritten)) {
view release on metacpan or search on metacpan
the following values:
$Net::NIS::ERR_ACCESS Access violation
$Net::NIS::ERR_BADARGS Args to function are bad
$Net::NIS::ERR_BADDB yp data base is bad
$Net::NIS::ERR_BUSY Database is busy
$Net::NIS::ERR_DOMAIN Can't bind to a server which serves this domain
$Net::NIS::ERR_KEY No such key in map
$Net::NIS::ERR_MAP No such map in server's domain
$Net::NIS::ERR_NODOM Local domain name not set
$Net::NIS::ERR_PMAP Can't communicate with portmapper
view release on metacpan or search on metacpan
#
# -M Master server only. This option specifies that the request should
# be sent to the master server of the named data. This guarantees that
# the most up-to-date information is seen at the possible expense
# of increasing the load on the master server and increasing the
# possibility of the NIS+ server being unavailable or busy for updates.
#
# -P Follow concatenation path. This option specifies that the request
# should follow the concatenation path of a table if the initial search
# is unsuccessful. This option is only useful when using an indexed
# name for name and the -o option.
view release on metacpan or search on metacpan
build/build-aux/install-sh view on Meta::CPAN
# to itself, or perhaps because mv is so ancient that it does not
# support -f.
{
# Now remove or move aside any old file at destination location.
# We try this two ways since rm can't unlink itself on some
# systems and the destination file might be busy for other
# reasons. In this case, the final cleanup might fail but the new
# file should still install successfully.
{
test ! -f "$dst" ||
$doit $rmcmd -f "$dst" 2>/dev/null ||
view release on metacpan or search on metacpan
CONTRIBUTING.md view on Meta::CPAN
Your contributions are absolutely welcome!
## Reporting issues:
Hey all, it's just me maintaining this module. I'm a busy person, and my time working on this module is prescious and short. If you would like to submit an issue, please observe the following:
0. I'm going to try my best to resolve your issues, but if I can't figure out how to test or replicate the issue you report, I won't be able to help you.
1. If you are reporting a bug that you found, _please_ attach a simple test program to your bug. This will help me see what you're saying much more quickly, and it'll help me fix your issue more quickly.
2. I mostly develop on macOS, so if you have an issue that you suspect is OS-specific, please attach a `Dockerfile` (or equivalent) so that I can check the issue out inside that environment.
3. If you have an SSL-specific issue, please verify that it also occurs on the default test install, or help me figure out how to test it otherwise.
view release on metacpan or search on metacpan
spec/amqp0-10.xml view on Meta::CPAN
<choice name="normal" value="0">
<doc>
The session was detached by request.
</doc>
</choice>
<choice name="session-busy" value="1">
<doc>
The session is currently attached to another transport.
</doc>
</choice>
<choice name="transport-busy" value="2">
<doc>
The transport is currently attached to another session.
</doc>
</choice>
<choice name="not-attached" value="3">
spec/amqp0-10.xml view on Meta::CPAN
<doc>
Identifies the session to be attached to the current transport.
</doc>
</field>
<field name="force" type="bit" label="force attachment to a busy session">
<doc>
If set then a busy session will be forcibly detached from its other transport and
reattached to the current transport.
</doc>
</field>
</control>
view release on metacpan or search on metacpan
lib/Net/API/Telegram.pm view on Meta::CPAN
=item I<error_message>
This parameter type is String and is optional.
Required if ok is False. Error message in human readable form that explains the reason for failure to proceed with the checkout (e.g. "Sorry, somebody just bought the last of our amazing black T-shirts while you were busy filling out your payment det...
=item I<ok>
This parameter type is Boolean and is required.
view release on metacpan or search on metacpan
lib/Net/Analysis.pm view on Meta::CPAN
To look at how to write a listener that maintains session state, see
L<Net::Analysis::Listener::HTTP>.
=head1 TODO
Performance - this may not be fast enough to handle busy servers in real time.
More work on live capture, this is still experimental.
UDP support
view release on metacpan or search on metacpan
lib/Net/Async/Beanstalk/Stack.pm view on Meta::CPAN
=item current_command
Returns the command the server is currently processing, or has just
sent a response to, without removing it from the stack.
=item is_busy
A boolean indicating whether the client is busy, ie. has a command
currently being processed or has commands waiting to be sent. Actually
implemented by the same method as L</count_commands>.
=item _pending_commands
lib/Net/Async/Beanstalk/Stack.pm view on Meta::CPAN
init_arg => undef,
default => sub { [] },
handles_via => 'Array',
handles => {
count_commands => 'count',
is_busy => 'count',
_pending_commands => 'all',
_push_command => 'push',
_shift_command => 'shift',
},
);
view release on metacpan or search on metacpan
lib/Net/Async/HTTP.pm view on Meta::CPAN
=item max_connections_per_host > 1
In this mode, there can be more than one connection per host. If a new request
is made, it will try to re-use idle connections if there are any, or if they
are all busy it will create a new connection to the host, up to the configured
limit.
=item max_connections_per_host = 0
In this mode, there is no upper limit to the number of connections per host.
Every new request will try to reuse an idle connection, or else create a new
one if all the existing ones are busy.
=back
These modes all apply per hostname / server port pair; they do not affect the
behaviour of connections made to differing hostnames, or differing ports on
view release on metacpan or search on metacpan
template => {
spec => {
restartPolicy => 'Never',
containers => [{
name => 'worker',
image => 'busybox:latest',
command => ['sh', '-c',
'echo "Job started at $(date)"; '
. 'echo "Processing items..."; '
. 'for i in 1 2 3 4 5; do echo " Item $i done"; sleep 1; done; '
. 'echo "Job completed at $(date)"'
template => {
spec => {
restartPolicy => 'OnFailure',
containers => [{
name => 'cron-worker',
image => 'busybox:latest',
command => ['sh', '-c', 'echo "Cron tick at $(date)"'],
resources => {
requests => { cpu => '10m', memory => '8Mi' },
limits => { cpu => '25m', memory => '16Mi' },
},
spec => {
serviceAccountName => 'demo-sa',
restartPolicy => 'Never',
containers => [{
name => 'util',
image => 'busybox:latest',
command => ['sh', '-c', join('; ',
'echo "=== Environment ==="',
'echo "APP_ENV=$APP_ENV"',
'echo "LOG_LEVEL=$LOG_LEVEL"',
'echo "DB_HOST=$DB_HOST"',
view release on metacpan or search on metacpan
examples/mutex.pl view on Meta::CPAN
my $removed = $loop->new_future;
die 'no cc cache?' unless $redis->is_client_side_cache_enabled;
my $src = $redis->clientside_cache_events
->each(sub {
$log->infof('Key change detected for %s', $_);
if($_ eq 'task.busy') {
my $f = $removed;
$removed = $loop->new_future;
$f->done
} else {
$log->infof('Nothing to do with us');
examples/mutex.pl view on Meta::CPAN
my $timeout = $loop->delay_future(after => 5);
until($timeout->is_ready) {
await $loop->delay_future(after => 0.005 * rand);
$log->infof('Try to set key');
if(my $res = await $redis->set('task.busy' => $id, qw(NX GET PX), 3_000)) {
$log->infof('We lost - res = %s', $res);
if(await $redis->get('task.busy')) {
await $removed;
$log->infof('Notified removal');
} else {
$log->infof('Key disappeared');
}
} else {
$log->infof('We won');
++$count{$id};
await $loop->delay_future(after => 0.003 * rand);
$log->infof('Release');
await $redis->del('task.busy');
}
}
return;
}, foreach => [1..10], concurrent => 10);
$log->infof('done');
view release on metacpan or search on metacpan
rbldnsdAccessor.pm view on Meta::CPAN
&ISC_R_CONNREFUSED => 'connection refused',
&ISC_R_NORESOURCES => 'not enough free resources',
&ISC_R_EOF => 'end of file',
&ISC_R_BOUND => 'socket already bound',
&ISC_R_RELOAD => 'reload',
&ISC_R_LOCKBUSY => 'lock busy',
&ISC_R_EXISTS => 'already exists',
&ISC_R_NOSPACE => 'ran out of space',
&ISC_R_CANCELED => 'operation canceled',
&ISC_R_NOTBOUND => 'socket is not bound',
&ISC_R_SHUTTINGDOWN => 'shutting down',
view release on metacpan or search on metacpan
libcdp/install-sh view on Meta::CPAN
&& { test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } \
&& { test -z "$chmodcmd" || $doit $chmodcmd "$dsttmp"; } &&
# Now remove or move aside any old file at destination location. We
# try this two ways since rm can't unlink itself on some systems and
# the destination file might be busy for other reasons. In this case,
# the final cleanup might fail but the new file should still install
# successfully.
{
if test -f "$dstdir/$dstfile"; then
$doit $rmcmd -f "$dstdir/$dstfile" 2>/dev/null \
view release on metacpan or search on metacpan
lib/Net/CSTA/ASN.pm view on Meta::CPAN
EventCause ::= ENUMERATED {
activeMonitor (1),
alternate (2),
busy (3),
callback (4),
callCancelled (5),
callForwardAlways (6),
callForwardBusy (7),
callForwardNoAnswer (8),