Result:
found more than 817 distributions - search limited to the first 2001 files matching your query
( run in 1.833 )
Log-Log4perl
view release on metacpan or search on metacpan
lib/Log/Log4perl/Appender/File.pm view on Meta::CPAN
=item syswrite
C<syswrite>, if set to a true value, makes sure that the appender uses
syswrite() instead of print() to log the message. C<syswrite()> usually
maps to the operating system's C<write()> function and makes sure that
no other process writes to the same log file while C<write()> is busy.
Might safe you from having to use other synchronisation measures like
semaphores (see: Synchronized appender).
=item umask
Log-Saftpresse
view release on metacpan or search on metacpan
lib/Log/Saftpresse/CountersOutput/Html.pm view on Meta::CPAN
sub print_smtpd_stats {
my ( $self, $cnt ) = @_;
my $connections = $cnt->get_value_or_zero('total');
my $hosts_domains = int(keys %{$cnt->get_node('per_domain')});
my $avg_conn_time = $connections > 0 ?
($cnt->get_value_or_zero('busy', 'total')
/ $connections ) + .5 : 0;
my $total_conn_time = $cnt->get_value_or_zero('busy', 'total');
print $self->headline(1, 'Smtpd Statistics');
print $self->key_value_table( "Connections", [
[ 'Connections', $connections ],
lib/Log/Saftpresse/CountersOutput/Html.pm view on Meta::CPAN
print $self->statistics_from_hashes(
legend => $table,
sort => $sort,
rows => [
[ 'connections', $smtpd_stats->get_node($key) ],
[ 'time conn.', $smtpd_stats->get_node('busy', $key) ],
[ 'avg./conn.', $self->hash_calc_avg( 2,
$smtpd_stats->get_node('busy', $key),
$smtpd_stats->get_node($key),
), ],
[ 'max. time', $smtpd_stats->get_node('busy', 'max_'.$key ), ],
],
);
}
return;
}
lib/Log/Saftpresse/CountersOutput/Html.pm view on Meta::CPAN
rows => [
[ 'sent cnt', $delivered->get_node($table, 'by_domain') ],
[ 'bytes', $delivered->get_node($table, 'size', 'by_domain') ],
$table eq 'sent' ? (
# TODO
#[ 'defers', $delivered->get_node('busy', 'per_day') ],
[ 'avg delay', $self->hash_calc_avg( 2,
$delivered->get_node($table, 'delay', 'by_domain'),
$delivered->get_node($table, 'by_domain'),
), ],
[ 'max. delay', $delivered->get_node($table, 'max_delay', 'by_domain'), ],
Lucy
view release on metacpan or search on metacpan
cfcore/Lucy/Store/ErrorMessage.c view on Meta::CPAN
msg = "Bad font file format";
break;
#endif
#ifdef EBUSY
case EBUSY:
msg = "Device or resource busy";
break;
#endif
#ifdef ECANCELED
case ECANCELED:
msg = "Operation Canceled";
cfcore/Lucy/Store/ErrorMessage.c view on Meta::CPAN
msg = "Too many references: cannot splice";
break;
#endif
#ifdef ETXTBSY
case ETXTBSY:
msg = "Text file busy";
break;
#endif
#ifdef EUCLEAN
case EUCLEAN:
msg = "Structure needs cleaning";
MCE-Shared
view release on metacpan or search on metacpan
* Bumped MCE dependency to 1.864.
1.863 Sun Nov 26 20:00:00 EST 2019
* Use MCE::Channel for MCE::Hobo->yield to not incur unnecessary delays
due to busy shared-manager process.
* Re-factored recent changes regarding IPC safety in MCE::Shared::Server.
This update defers signal handling for HUP, INT, PIPE, QUIT, TERM, and
custom handlers during IPC without incurring a performance penalty.
See POD section labled "DEFER SIGNAL" in MCE::Signal 1.863.
MHFS-XS
view release on metacpan or search on metacpan
miniaudio/miniaudio.h view on Meta::CPAN
case MA_NOT_DIRECTORY: return "Not a directory";
case MA_IS_DIRECTORY: return "Is a directory";
case MA_DIRECTORY_NOT_EMPTY: return "Directory not empty";
case MA_AT_END: return "At end";
case MA_NO_SPACE: return "No space available";
case MA_BUSY: return "Device or resource busy";
case MA_IO_ERROR: return "Input/output error";
case MA_INTERRUPT: return "Interrupted";
case MA_UNAVAILABLE: return "Resource unavailable";
case MA_ALREADY_IN_USE: return "Resource already in use";
case MA_BAD_ADDRESS: return "Bad address";
miniaudio/miniaudio.h view on Meta::CPAN
ma_resource_manager_inline_notification_init(pResourceManager, &initNotification);
}
/*
The status of the data buffer needs to be set to MA_BUSY before posting the job so that the
worker thread is aware of it's busy state. If the LOAD_DATA_BUFFER job sees a status other
than MA_BUSY, it'll assume an error and fall through to an early exit.
*/
c89atomic_exchange_i32(&pDataBuffer->result, MA_BUSY);
/* Acquire fences a second time. These will be released by the async thread. */
miniaudio/miniaudio.h view on Meta::CPAN
We cannot be using the data buffer after it's been uninitialized. If you trigger this assert it means you're trying to read from the data buffer after
it's been uninitialized or is in the process of uninitializing.
*/
MA_ASSERT(ma_resource_manager_data_buffer_node_result(pDataBuffer->pNode) != MA_UNAVAILABLE);
/* If the node is not initialized we need to abort with a busy code. */
if (ma_resource_manager_data_buffer_node_get_data_supply_type(pDataBuffer->pNode) == ma_resource_manager_data_supply_type_unknown) {
return MA_BUSY; /* Still loading. */
}
if (pDataBuffer->seekToCursorOnNextRead) {
miniaudio/miniaudio.h view on Meta::CPAN
if (frameCount > availableFrames) {
frameCount = availableFrames;
/*
If there's no frames available we want to set the status to MA_AT_END. The logic below
will check if the node is busy, and if so, change it to MA_BUSY. The reason we do this
is because we don't want to call `ma_data_source_read_pcm_frames()` if the frame count
is 0 because that'll result in a situation where it's possible MA_AT_END won't get
returned.
*/
if (frameCount == 0) {
miniaudio/miniaudio.h view on Meta::CPAN
if (ma_resource_manager_data_stream_result(pDataStream) != MA_SUCCESS) {
return MA_INVALID_OPERATION;
}
/* Don't attempt to read while we're in the middle of seeking. Tell the caller that we're busy. */
if (ma_resource_manager_data_stream_seek_counter(pDataStream) > 0) {
return MA_BUSY;
}
/* If the page we're on is invalid it means we've caught up to the job thread. */
miniaudio/miniaudio.h view on Meta::CPAN
if (ma_resource_manager_data_stream_result(pDataStream) != MA_SUCCESS) {
return MA_INVALID_OPERATION;
}
/* Don't attempt to read while we're in the middle of seeking. Tell the caller that we're busy. */
if (ma_resource_manager_data_stream_seek_counter(pDataStream) > 0) {
return MA_BUSY;
}
ma_resource_manager_data_stream_get_data_format(pDataStream, &format, &channels, NULL, NULL, 0);
miniaudio/miniaudio.h view on Meta::CPAN
return MA_INVALID_ARGS;
}
/*
If the stream is in an erroneous state we need to return an invalid operation. We can allow
this to be called when the data stream is in a busy state because the caller may have asked
for an initial seek position and it's convenient to return that as the cursor position.
*/
result = ma_resource_manager_data_stream_result(pDataStream);
if (result != MA_SUCCESS && result != MA_BUSY) {
return MA_INVALID_OPERATION;
miniaudio/miniaudio.h view on Meta::CPAN
/* Allocate the decoder by initializing a decoded data supply. */
result = ma_resource_manager_data_buffer_node_init_supply_decoded(pResourceManager, pDataBufferNode, pJob->data.resourceManager.loadDataBufferNode.pFilePath, pJob->data.resourceManager.loadDataBufferNode.pFilePathW, pJob->data.resourceManager...
/*
Don't ever propagate an MA_BUSY result code or else the resource manager will think the
node is just busy decoding rather than in an error state. This should never happen, but
including this logic for safety just in case.
*/
if (result == MA_BUSY) {
result = MA_ERROR;
}
miniaudio/miniaudio.h view on Meta::CPAN
newJob = *pJob; /* Everything is the same as the input job, except the execution order. */
newJob.order = ma_resource_manager_data_buffer_node_next_execution_order(pDataBufferNode); /* We need a fresh execution order. */
result = ma_resource_manager_post_job(pResourceManager, &newJob);
/* Since the sound isn't yet fully decoded we want the status to be set to busy. */
if (result == MA_SUCCESS) {
result = MA_BUSY;
}
}
miniaudio/miniaudio.h view on Meta::CPAN
if (result == MA_BUSY || (result == MA_SUCCESS && isConnectorInitialized == MA_FALSE && dataSupplyType == ma_resource_manager_data_supply_type_unknown)) {
return ma_resource_manager_post_job(pResourceManager, pJob);
}
done:
/* Only move away from a busy code so that we don't trash any existing error codes. */
c89atomic_compare_and_swap_i32(&pDataBuffer->result, MA_BUSY, result);
/* Only signal the other threads after the result has been set just for cleanliness sake. */
if (pJob->data.resourceManager.loadDataBuffer.pDoneNotification != NULL) {
ma_async_notification_signal(pJob->data.resourceManager.loadDataBuffer.pDoneNotification);
MIME-Explode
view release on metacpan or search on metacpan
testmsgs/not-term-bdr.mbx view on Meta::CPAN
--=====1033753162.34651=====
Content-Type: text/plain; charset="iso-8859-1"
Tired of missing all of your phone calls while you’re on the Internet?
Ever wonder who’s trying to get a hold of you while you’re surfing the web?
"I've been trying to reach you all day, but all I ever get is the busy
signal!" We've all heard this complaint from our friends and relatives, or even complained about it ourselves.
The Emerson Switchboard is exactly what you need to make sure you never have this conversation again. This great product allows you to receive phone calls and faxes while you remain on the Internet, so you won’t need another phone line. Buy one for ...
http://offerupdate.com/cgi/pld?&f=50002&r=8613&z=50015
testmsgs/not-term-bdr.mbx view on Meta::CPAN
</b></font></center>
<br clear="all">
<font face="Arial,Helvetica,sans-serif" size="2">
Now you can get a quick phone call or fax while you’re online, all from just a single phone line! The revolutionary <b><a href="http://offerupdate.com/cgi/pld?&f=50002&r=8613&z=50015">Emerson Switchboard</a></b> temporarily splits your phone signal i...
<P>
No more busy signals, missed calls, or getting kicked offline! It works with all computers, all phones and fax machines, and all internet service providers. If you're tired of getting kicked off the computer, missing important phone calls, and hearin...
<P>
<center><a href="http://offerupdate.com/cgi/pld?&f=50002&r=8613&z=50015"><img src="http://www.youcansave.net/email-switchboard.gif" width="302" height="179" alt="" border="0"></a></center>
<ul>
<li>Ideal for any make or model computer! </li>
<li>Use with ANY phone or fax machine! </li>
<li>Works with ANY Internet Service Provider! </li>
<li>Instant connections for phone line, computer, fax and telephone. </li>
<li>No software needed, no installation, works automatically! </li>
<li>No more busy signals! No more missed calls! </li>
<li>No more getting kicked offline! </li>
<li>No more arguments over who's using the phone! </li>
<li>Rings and flashes with an incoming call! Simply answer the phone while you are online! </li>
<li>Includes an AC adapter and a phone cord</li>
</ul>
MIME-tools
view release on metacpan or search on metacpan
testin/andreas-1296.txt view on Meta::CPAN
Hi, Eryq,
I hope, all's well! In case you're on holidays, happy holidays! In
case you're hacking, I have something to crack for you. In case you're
busy, good luck with your work!
Today I got a message that resulted in
k@anna:~% perl Mail/unmime.it < Mail/mh/mime/94
MIME::ParserBase::parse_preamble() unexpected eof in preamble
MOSES-MOBY
view release on metacpan or search on metacpan
share/mabuhay.file view on Meta::CPAN
Lingala (Congo) Mbóte na yó
Lingala (Lomongo Congo) Losáko
Lingua Franca (Mediterranean) Salute
Lingua Franca (Mediterranean) Bon dgiorno
Lisu (Thailand) Ali nga?
Lisu (Thailand) [answer-if you aren't busy] Atdor nat niaq nga
Lisu (Thailand) [answer-if you aren't busy] Alshit lil mat yi niaq
Lisu (Thailand) [answer-if you are busy] Tei zil mit atkel cat niaq nga
Lithuanian (Lithuania) (said to male) Sveikas
Lithuanian (Lithuania) (said to female) Sveika
Lithuanian (Lithuania) (several people) Sveiki
Lithuanian (Lithuania) Labas
Lithuanian (Lithuania) [to a man, formal] Sveikas gyvas
MP3-Tag
view release on metacpan or search on metacpan
tk-tag/tk-tag.pl view on Meta::CPAN
$var{files}->{$file}->{$_}=1;
}
}
}
closedir DIR;
$tktag->Unbusy;
}
sub filter_and_show {
my (@files, @dirs, $name, $val, $filter);
$element{filelist}->delete("0", "end");
MQSeries
view release on metacpan or search on metacpan
MQSeries/ErrorLog/descriptions.pl view on Meta::CPAN
'AMQ6122' => [ "An internal $product_patt error has occurred\\." ],
'AMQ6125' => [ "An internal error has occurred with identifier ($hex_patt)\\.",
"Id" ],
'AMQ6150' => [ "$product_patt semaphore is busy\\." ],
'AMQ6162' => [ "An error has occurred reading an INI file\\." ],
'AMQ6165' => [ "Access to the MQS.INI file or a queue manager QM.INI file is denied\\." ],
MYDan
view release on metacpan or search on metacpan
lib/MYDan/Util/MIO/CMD.pm view on Meta::CPAN
{
local $| = 1;
my $self = shift;
my @node = keys %$self;
my ( $run, $ext, %run, %result, %busy ) = ( 1, "$Script.$$", %RUN, @_ );
my ( $max, $timeout, $interchange ) = @run{ qw( max timeout interchange ) };
my $input = defined $run{input} ? $run{input} : -t STDIN ? '' : <STDIN>;
$SIG{INT} = $SIG{TERM} = sub
{
print STDERR "killed\n";
$run = 0;
};
for ( my $time = time; $run && ( @node || %busy ); )
{
$run = 0 if time - $time > $timeout;
while ( @node && keys %busy < $max )
{
my $node = shift @node;
my $log = "/tmp/$node.$ext";
my $cmd = $self->{$node};
my @cmd = map { my $t = $_; $t =~ s/$interchange/$node/g; $t } @$cmd;
lib/MYDan/Util/MIO/CMD.pm view on Meta::CPAN
next;
}
print "$node started.\n" if $run{verbose};
if ( my $pid = fork() ) { $busy{$pid} = [ $log, $node ]; next }
open STDOUT, ">>$log";
open STDERR, ">>$log";
exec sprintf join ' ', @cmd;
exit 0;
}
for ( keys %busy )
{
my $pid = waitpid( -1, WNOHANG );
next if $pid <= 0;
my $stat = $? >> 8;
my ( $log, $node ) = @{ delete $busy{$pid} };
print "$node done.\n" if $run{verbose};
tie my @log, 'Tie::File', $log,recsep => "\n";
lib/MYDan/Util/MIO/CMD.pm view on Meta::CPAN
push @{ $result{output}{ join "\n", $tmp, "--- $stat", '' } }, $node;
unlink $log;
}
}
kill 9, keys %busy;
push @{ $result{output}{killed} }, map{ $busy{$_}[1]}keys %busy;
push @{ $result{output}{norun} }, @node;
unlink glob "/tmp/*.$ext";
unlink $input if $input && -f $input;
return wantarray ? %result : \%result;
Mac-Carbon
view release on metacpan or search on metacpan
MoreFiles/MoreFilesSrc/FSpCompat.h view on Meta::CPAN
bdNamErr -37 Bad filename
fnfErr -43 File not found
wPrErr -44 Hardware volume lock
fLckdErr -45 File is locked
vLckdErr -46 Software volume lock
fBsyErr -47 File busy, directory not empty, or
working directory control block open
dirNFErrdirNFErr -120 Directory not found or incomplete pathname
afpAccessDenied -5000 User does not have the correct access
*/
Mac-Errors
view release on metacpan or search on metacpan
lib/Mac/Errors.pm view on Meta::CPAN
sub vLckdErr { -46 }
=item fBsyErr
File is busy (delete)
=cut
sub fBsyErr { -47 }
lib/Mac/Errors.pm view on Meta::CPAN
sub fsmFFSNotFoundErr { -431 }
=item fsmBusyFFSErr
File system is busy, cannot be removed
=cut
sub fsmBusyFFSErr { -432 }
lib/Mac/Errors.pm view on Meta::CPAN
sub kEFAULTErr { -3213 }
=item kEBUSYErr
Device or resource busy
=cut
sub kEBUSYErr { -3215 }
lib/Mac/Errors.pm view on Meta::CPAN
sub kUSBNotSent1Err { -6902 }
=item kUSBBufUnderRunErr
Host hardware failure on data out, PCI busy?
=cut
sub kUSBBufUnderRunErr { -6903 }
=item kUSBBufOvrRunErr
Host hardware failure on data in, PCI busy?
=cut
sub kUSBBufOvrRunErr { -6904 }
lib/Mac/Errors.pm view on Meta::CPAN
sub dcmDictionaryNotOpenErr { -7104 }
=item dcmDictionaryBusyErr
dictionary is busy
=cut
sub dcmDictionaryBusyErr { -7105 }
Mac-EyeTV
view release on metacpan or search on metacpan
lib/Mac/EyeTV.pm view on Meta::CPAN
'input_source' => 'input source',
'id' => 'unique ID',
);
foreach my $prop (
qw(title description channel_number station_name input_source repeats quality enabled busy id)
)
{
my $eyetv_prop = $map{$prop} || $prop;
my $value = $eyetv_programme->prop($eyetv_prop)->get;
$programme->$prop($value);
Mac-FSEvents
view release on metacpan or search on metacpan
lib/Mac/FSEvents.pm view on Meta::CPAN
=item latency
Optional. The number of seconds the FSEvents service should wait after hearing
about an event from the kernel before passing it along. Specifying a larger value
may result in fewer callbacks and greater efficiency on a busy filesystem. Fractional
seconds are allowed.
Default: 2.0
=item since
Mail-Bulkmail
view release on metacpan or search on metacpan
Bulkmail.pm view on Meta::CPAN
Also note that these speeds are only measuring the time it takes to get from Mail::Bulkmail to your SMTP relay. There are no
measurements reflecting how long it may take your SMTP relay to send the data on to the recipients on your list.
=item Am I going to see speeds that fast?
Maybe, maybe not. It depends on how busy your SMTP server is. If you have a relatively unused SMTP server with a fair amount
of horsepower and a fast connection, you can easily get these speeds or beyond. If you have a relatively busy and/or low powered
SMTP server or slow connections, you're not going to reach speeds that fast.
=item How much faster will Mail::Bulkmail be than my current system?
This is a very tough question to answer, since it depends highly upon what your current system is. For the sake of argument,
let's assume that for your current system, you open an SMTP connection to your server, send a message, and close the connection.
And then repeat. Open, send, close, etc.
Mail::Bulkmail will I<always> be faster than this approach since it opens one SMTP connection and sends every single message across
on that one connection. How much faster depends on how busy your server is as well as the size of your list. The connection will
only be closed if you have an error or if you reach the max number of messages to send in a given server connection.
Lets assume (for simplicity's sake) that you have a list of 100,000 people. We'll also assume that you have a pretty busy
SMTP server and it takes (on average) 25 seconds for the server to respond to a connection request. We're making 100,000
connection requests (with your old system). That means 100,000 x 25 seconds = almost 29 days waiting just to make connections
to the server! Mail::Bulkmail makes one connection, takes 25 seconds for it, and ends up being 100,000x faster!
But, now lets assume that you have a very unbusy SMTP server and it responds to connection requests in .003 seconds. We're making
100,000 connection requests. That means 100,000 x .0003 seconds = about 5 minutes waiting to make connections to the server.
Mail::Bulkmail makes on connection, takes .0003 seconds for it, and ends up only being 1666x faster. But, even though being
1,666 times faster sounds impressive, the world won't stop spinning on its axis if you use your old system and take up an extra
5 minutes.
Mail-DeliveryStatus-BounceParser
view release on metacpan or search on metacpan
t/corpus/comcast-via-sendmail.unknown.msg view on Meta::CPAN
<recipient@example.net>
(reason: 551 not our customer)
----- Transcript of session follows -----
... while talking to gateway-a.comcast.net.:
<<< 450 busy - please try later
... while talking to gateway-s.comcast.net.:
>>> DATA
<<< 551 not our customer
550 5.1.1 <recipient@example.net>... User unknown
<<< 503 need RCPT command [data]
Mail-Exchange
view release on metacpan or search on metacpan
lib/Mail/Exchange/PidLidDefs.pm view on Meta::CPAN
0x80c5 => { type => 0x0102, name => "PidLidFax2OriginalEntryId", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies a one-off EntryID corresponding to this fax address.
0x80d2 => { type => 0x001f, name => "PidLidFax3AddressType", guid => "00062004-0000-0000-C000-000000000046" }, # Contains the string value "FAX".
0x80d3 => { type => 0x001f, name => "PidLidFax3EmailAddress", guid => "00062004-0000-0000-C000-000000000046" }, # Contains a user-readable display name, followed by the "@" character, followed by a fax number.
0x80d4 => { type => 0x001f, name => "PidLidFax3OriginalDisplayName", guid => "00062004-0000-0000-C000-000000000046" }, #
0x80d5 => { type => 0x0102, name => "PidLidFax3OriginalEntryId", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies a one-off EntryID that corresponds to this fax address.
0x80d8 => { type => 0x001f, name => "PidLidFreeBusyLocation", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies a URL path from which a client can retrieve free/busy status information for the contact.
0x80da => { type => 0x001f, name => "PidLidHomeAddressCountryCode", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies the country code portion of the contact's home address.
0x80db => { type => 0x001f, name => "PidLidWorkAddressCountryCode", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies the country code portion of the contact's work address.
0x80dc => { type => 0x001f, name => "PidLidOtherAddressCountryCode", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies the country code portion of the contact's other address.
0x80dd => { type => 0x001f, name => "PidLidAddressCountryCode", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies the country code portion of the contact's mailing address.
0x80de => { type => 0x0040, name => "PidLidBirthdayLocal", guid => "00062004-0000-0000-C000-000000000046" }, # Specifies the birthday of a contact.
Mail-IMAPClient
view release on metacpan or search on metacpan
Fixed some bugs in _send_line (the "O" side of the I/O engine) that were
reported by Danny Smith.
Fixed a bug in the migrate method in the optimization code (which
gets called when socket writes are delayed due to a slow or busy target
host, aka EAGAIN errors). Thanks to Pedro Carvalho for identifying
this bug and its cause.
Fixed a bug in migrate that caused migration of unread messages to fail.
This was due to the way Mail::IMAPClient's migrate method would try to send
Mail-QmailRemoteXS
view release on metacpan or search on metacpan
qmailrem/CHANGES view on Meta::CPAN
writes a pipeful to qmail-lspawn or qmail-rspawn before they
can react (because of high concurrency, high load, or long
addresses), it will receive an incorrect -1/EAGAIN, and will
conclude that spawn died. sysadmin will have to restart qmail,
and messages will be duplicated. fix: in qmail-send.c,
busy-loop if write() to spawn returns any error other than
EPIPE.
19960501 bug: qmail-alias treated NAMETOOLONG and NOTDIR as temporary
errors. impact: qmail-alias never looked for -default; even if
mail was destined to bounce, it would have to time out first.
fix: qmail-alias now uses error_temp().
Mail-SMTP-Honeypot
view release on metacpan or search on metacpan
Honeypot.pm view on Meta::CPAN
$threads->{$DNSfileno}->{read} = \&dns_rcv; # always armed
foreach(grep(!/\D/,keys %$threads)) { # each thread key
vec($rin,$_,1) = 1 if $threads->{$_}->{read}; # set read selects
vec($win,$_,1) = 1 if $threads->{$_}->{write}; # set write selects
}
$go_listen->{read} = \&newthread; # re-arm listner if it was busy
$nfound = select($rout=$rin,$wout=$win,undef,1); # tick each second
if ($nfound > 0) {
do_thread($wout,'write') if $wout;
do_thread($rout,'read') if $rout;
Mail-SPF-Iterator
view release on metacpan or search on metacpan
1.119 2018-11-15
- quote fields like envelope-from correctly when writing Received-SPF
1.118 2018-10-29
- fixed potential busy loop with specific DNS responses
- ignore case when comparing answer from DNS to query
1.117 2018-09-24
- fixed mail header when pass_all matched to include reason etc
- add --passall option to samples/spflookup.pl
Mail-SpamAssassin
view release on metacpan or search on metacpan
lib/Mail/SpamAssassin/BayesStore/Redis.pm view on Meta::CPAN
The Redis backend for Bayes can put a Lua scripting support in a Redis
server to good use, improving performance. The Lua support is available
in Redis server since version 2.6. In absence of a Lua support, the Redis
backend uses batched (pipelined) traditional Redis commands, so it should
work with a Redis server version 2.4 (untested), although this is not
recommended for busy sites.
Expiration of token and 'seen' message id entries is left to the Redis
server. There is no provision for manually expiring a database, so it is
highly recommended to leave the setting bayes_auto_expire to its default
value 1 (i.e. enabled).
Mail-SpamCannibal
view release on metacpan or search on metacpan
contrib/mimedefang-filter view on Meta::CPAN
# Set the next one if your mail client cannot handle multiple "inline"
# parts.
$Stupidity{"NoMultipleInlines"} = 0;
# The next lines force SpamAssassin modules to be loaded and rules
# to be compiled immediately. This may improve performance on busy
# mail servers. Comment the lines out if you don't like them.
if ($Features{"SpamAssassin"}) {
spam_assassin_init()->compile_now(1) if defined(spam_assassin_init());
# If you want to use auto-whitelisting:
Mail-Summary
view release on metacpan or search on metacpan
my @mail_summaries = $ms->summaries;
=head1 DESCRIPTION
Too busy to read your mail? Subscribe to too many mailing lists?
Take two folders into the shower? Well, for the busy on the go geek
of today, here is the answer! Get all your messages summarised, to
save you having to read them, or to read them by which summary looks
better!
=cut
Mail-Toaster
view release on metacpan or search on metacpan
doc/toaster-watcher.conf view on Meta::CPAN
vpopmail_qmail_ext = 1
vpopmail_rebuild_tcpserver_file = 0
By default, vpopmail updates ~vpopmail/etc/tcp.smtp every time a new
user is added to the relay table, which is every time a user
successfully authenticates. This generates a lot of disk i/o on a busy
mail seerver but is necessary for tcpserver to "see" the update. This is
not necessary with the Mail::Toaster because we use the MySQL patch to
tcpserver to check the SQL table directly.
vpopmail_ip_alias_domains = 0
doc/toaster-watcher.conf view on Meta::CPAN
vpopmail_domain_quotas = 0
vpopmail_default_quota = 100000000S,10000C
The domain quota feature has been broken on vpopmail almost forever.
Even when it worked, it introduced extremely high CPU loads on busy mail
systems. It is to be avoided.
The default quota option is deprecated in vpopmail 5.4.0 and higher. See
~vpopmail/etc/vlimits.default to control default limits.
doc/toaster-watcher.conf view on Meta::CPAN
send_log_isoqlog = 1
This allows you to choose whether your qmail-send logs will be
post-processed by isoqlog. This will trigger isoqlog every 5 minutes at
which time it'll update the pretty HTML pages it generates. This is a
handy default but if you have a really busy mail server (see if isoqlog
takes more than a couple seconds to run) with lots of logs, it's better
to disable this and run isoqlog from cron less frequently.
send_mailbox_string = ./Maildir/
MailFolder
view release on metacpan or search on metacpan
examples/xmailfolder.pl view on Meta::CPAN
# figure why a abnormal exit doesn't cleanup the open mailbox
# key accelerators are conflicting with each other (Alt-f,c vs. c)
# actually detect error returns from MailFolder calls
# do more appropriate error handling in CoreCompose and friends
# SNIGGLES
# add busy-cursor in appropriate places
# figure how to get a Shift-(Next|Prior) to move the msg window in the
# folder window
# figure out how set width of scrollbars - normal way isn't working
require 5.00397;
Marpa-R2
view release on metacpan or search on metacpan
engine/read_only/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 ||
MarpaX-Hoonlint
view release on metacpan or search on metacpan
hoons/arvo/app/dojo.hoon view on Meta::CPAN
++ dy-edit :: handle edit
|= cal/sole-change
^+ +>+>
=^ dat say (~(transceive sole say) cal)
?: |(?=(^ per) ?=(^ pux) ?=($~ pro))
~& %dy-edit-busy
=^ lic say (~(transmit sole say) dat)
(dy-diff %mor [%det lic] [%bel ~] ~)
(dy-slam(per `dat) /edit u.pro !>((tufa buf.say)))
::
++ dy-type :: sole action
Math-3Space
view release on metacpan or search on metacpan
cpanm Dist::Zilla
dzil authordeps | cpanm
dzil build
While Dist::Zilla takes the busywork and mistakes out of module authorship,
it fails to address the need of XS authors to easily compile XS projects
and run single testcases, rather than the whole test suite. For this, you
might find the following script handy:
./dzil-prove t/04-transform.t # or any other testcase
( run in 1.833 second using v1.01-cache-2.11-cpan-6aa56a78535 )