view release on metacpan or search on metacpan
lib/CTK/Log.pm view on Meta::CPAN
$logger->log_except( "..." ); # 9 exception, aborts program!
$logger->log_fatal( "..." ); # 8 system unusable, aborts program!
$logger->log_emerg( "..." ); # 7 system is unusable
$logger->log_alert( "..." ); # 6 failure in primary system
$logger->log_crit( "..." ); # 5 failure in backup system
$logger->log_error( "..." ); # 4 non-urgent program errors, a bug
$logger->log_warning( "..." ); # 3 possible problem, not necessarily error
$logger->log_notice( "..." ); # 2 unusual conditions
$logger->log_info( "..." ); # 1 normal messages, no action required
$logger->log_debug( "..." ); # 0 debugging messages (default)
lib/CTK/Log.pm view on Meta::CPAN
0 7 debug debugging messages, copious tracing output
1 6 info normal messages, no action required
2 5 notice note unusual conditions
3 4 warning warn possible problem, not necessarily error
4 3 error err non-urgent program errors, a bug
5 2 critical crit failure in backup system
6 1 alert failure in primary system
7 0 emergency emerg system unusable
8 0 fatal system unusable, aborts program!
9 0 exception except exception, aborts program!
view release on metacpan or search on metacpan
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
arbitrary data structure such as a parse tree for I<$input>) just as B<Call>
would. If parsing fails, B<Try> does not abort but simply returns B<undef>,
ignoring any error messages generated during the attempt. In addition, the
call stack is restored and all parameters are reset to their previous values,
so that parsing can continue as if nothing had happened (note, however, that
this is based on flat backup copies, so complex data structures may have been
altered destructively).
=cut
sub Try {
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
unless @_ == 3;
my ($self, $rule, $input) = @_;
confess "Sorry, we're not parsing yet"
unless defined $self->{INPUT};
## make flat backup copies of important data structures and ensure they are restored upon return
## (this is not completely safe, but should undo most changes that a failed parse may have made)
my $back_param = [ @{$self->{PARAM}} ];
my $back_callstack = [ @{$self->{CALLSTACK}} ];
my ($back_groups, $back_current_group, $back_groupstack) = (undef, undef, undef);
if (defined $self->{GROUPS}) {
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
$back_groupstack = [ @{$self->{GROUPSTACK}} ];
}
my $result = eval { $self->Call($rule, $input) };
## if parsing failed, restore internal data structures from backup copies
if (not defined $result) {
$self->{PARAM} = $back_param;
$self->{CALLSTACK} = $back_callstack;
$self->{GROUPS} = $back_groups;
if (defined $back_groups and defined $back_current_group) {
view release on metacpan or search on metacpan
gen/Makefile.unix view on Meta::CPAN
all: cperl
install: cperl
@if [ -f "$(CACHEDIR)/bin/cache.old" ] ; then \
echo "sorry, there is already a backup copy of your cache binary" ; \
echo "Aborting - nothing done" ; \
exit 1 ; \
fi
mv "$(CACHEDIR)/bin/cache" "$(CACHEDIR)/bin/cache.old"
cp ./cperl "$(CACHEDIR)/bin/cperl"
view release on metacpan or search on metacpan
lib/Cache/CacheFactory.pm view on Meta::CPAN
Pruning and validity policies are set on a per-cache basis rather than
on a per-storage-policy basis, this makes multiple storage policies
largely pointless for most purposes where you'd find it useful.
If you wanted the cache to transparently use a small fast memory cache
first and fall back to a larger slower file cache as backup: you can't
do it, because the size pruning policy would be the same for both storage
policies.
About the only current use of multiple storage policies is to have a
memory cache and a file cache so that processes that haven't pulled
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
view release on metacpan or search on metacpan
av_tindex||5.017009|
av_top_index||5.017009|
av_undef|||
av_unshift|||
ax|||n
backup_one_LB|||
backup_one_SB|||
backup_one_WB|||
bad_type_gv|||
bad_type_pv|||
bind_match|||
block_end||5.004000|
block_gimme||5.004000|
view release on metacpan or search on metacpan
lib/CallBackery/GuiPlugin/Abstract.pm view on Meta::CPAN
};
=head2 stateFiles
A list of files that contain the state of the settings configured by
this plugin this is used both for backup purposes and to replicate the
settings to a second installation.
=cut
has stateFiles => sub {
view release on metacpan or search on metacpan
av_tindex||5.017009|
av_top_index||5.017009|
av_undef|||
av_unshift|||
ax|||n
backup_one_SB|||
backup_one_WB|||
bad_type_gv|||
bad_type_pv|||
bind_match|||
block_end||5.004000|
block_gimme||5.004000|
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
^Makefile$
^andy/
^blib/
^pm_to_blib$
# Temp, old and emacs backup files.
~$
^\.DS_Store
\.(old|tmp|bak)$
^#.*#$
^\.#
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
\bBuild.bat$
\bBuild.COM$
\bBUILD.COM$
\bbuild.com$
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
\bbuild.com$
# and Module::Build::Tiny generated files
\b_build_params$
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
CPAN.SKIP
t/000_standard__*
Debian_CPANTS.txt
nytprof.out
# Temp, old, emacs, vim, backup files.
~$
\.old$
\.swp$
\.tar$
\.tar\.gz$
view release on metacpan or search on metacpan
av_tindex|5.017009|5.017009|p
av_top_index|5.017009|5.017009|p
av_undef|||
av_unshift|||
ax|||n
backup_one_GCB|||
backup_one_LB|||
backup_one_SB|||
backup_one_WB|||
bad_type_gv|||
bad_type_pv|||
bind_match|||
block_end||5.004000|
block_gimme||5.004000|
view release on metacpan or search on metacpan
lib/Catalog.pm view on Meta::CPAN
($self->db()->exec_select_one("select count(*) as count from catalog_date_$name")->{'count'} <= 0)) {
$self->cdate_count_1_api($name);
}
#
# Try to load the most specific template first, then backup to
# cdate_default if none is found.
#
my($prefix) = $cgi->param('template') ? "cdate_" . $cgi->param('template') : "cdate_default";
my($template) = template_load("$prefix.html", $self->{'templates'}, $cgi->param('style'));
if(!defined($template)) {
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build
# Avoid temp and backup files.
~$
\.tmp$
\.old$
\.bak$
\#$
view release on metacpan or search on metacpan
lib/Catalyst/ActionRole/PseudoCache.pm view on Meta::CPAN
if ($c->debug);
if ($self->true_cache) {
$self->_true_cache($orig,@_);
} else {
# backup method (for back compat)
$self->_pseudo_cache($orig,@_);
}
};
sub _true_cache {
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
\bBuild$
\b_build
Build.PL
Build.bat
# Avoid temp and backup files.
~$
\.gz$
\.old$
\.bak$
\.swp$
view release on metacpan or search on metacpan
MANIFEST.skip view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
lib/CatalystX/ASP.pm view on Meta::CPAN
The mail host is the SMTP server that the below Mail* config directives will
use when sending their emails. By default L<Net::SMTP> uses SMTP mail hosts
configured in L<Net::Config>, which is set up at install time, but this setting
can be used to override this config.
The mail hosts specified in the Net::Config file will be used as backup SMTP
servers to the C<MailHost> specified here, should this primary server not be
working.
__PACKAGE__->config('CatalystX::ASP' => {
MailHost => 'smtp.yourdomain.com.foobar' });
view release on metacpan or search on metacpan
lib/CatalystX/Crudite/Util/Random.pm view on Meta::CPAN
backtracked
backtracker
backtrackers
backtracking
backtracks
backup
backups
Backus
backward
backwardness
backwards
backwater
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
av_tindex||5.017009|
av_top_index||5.017009|
av_undef|||
av_unshift|||
ax|||n
backup_one_LB|||
backup_one_SB|||
backup_one_WB|||
bad_type_gv|||
bad_type_pv|||
bind_match|||
block_end||5.004000|
block_gimme||5.004000|
view release on metacpan or search on metacpan
lib/CfgTie/filever.pm view on Meta::CPAN
B<Return Value>: 0 on success, -1 on error;
=head2 C<Roll(>I<path>,I<depth>,I<sep>C<)>
This convert the specified files into a backup file (the original file is
renamed, so you had better have something to put there).
=over 1
=item I<Depth>
(optional) Controlls the number of backup copies
=item I<Sep>
(optional) Controlls the seperator between the main name and the backup
number
=back
The defaults for I<depth> and I<sep> are controlled by following two variables
lib/CfgTie/filever.pm view on Meta::CPAN
=over 1
=item C<RollDepth>
Controlls the number of of older versions that are kept around as backup
copies.
I<[Default: 4]>
=item C<RollSep>
Controls the separator between the file name and the backup number.
I<[Default: >C<~>I<]>
=back
=head2 C<RCS_path (>I<RCSObj>,I<path>C<)>
lib/CfgTie/filever.pm view on Meta::CPAN
my @S =stat $Old;
#If the old file does exist we need to do a bit of work (we use stat
#since the other bits of information are relevant too)
if (scalar @S)
{
#Migrate us to some backup copies, use one more than default so we
#can unroll
&Roll($Old,$RollDepth+1);
# Modify the permissions of the new file to match that of the old one.
if (!chmod($S[2], $New) ||
view release on metacpan or search on metacpan
t/001_parse/datepipeline_pipeline.res view on Meta::CPAN
{
"Type": "AWS::DataPipeline::Pipeline",
"Properties": {
"Name": "DynamoDBInputS3OutputHive",
"Description": "Pipeline to backup DynamoDB data to S3",
"Activate": "true",
"ParameterObjects": [
{
"Id": "myDDBReadThroughputRatio",
"Attributes": [
view release on metacpan or search on metacpan
repository.url = https://github.com/atoomic/Char-Replace.git
repository.web = https://github.com/atoomic/Char-Replace.git
repository.type = git
[PruneFiles]
match = ~$ ; emacs backup files
;[PodCoverageTests]
;[Test::EOL]
; still a work in progress
view release on metacpan or search on metacpan
repository.url = https://github.com/atoomic/Check-GlobalPhase.git
repository.web = https://github.com/atoomic/Check-GlobalPhase.git
repository.type = git
[PruneFiles]
match = ~$ ; emacs backup files
;[PodCoverageTests]
;[Test::EOL]
; still a work in progress
view release on metacpan or search on metacpan
MANIFEST.SKIP view on Meta::CPAN
# Avoid Module::Build generated and utility files.
\bBuild$
\b_build/
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$