view release on metacpan or search on metacpan
lib/CLI/Meta/mv.pm view on Meta::CPAN
our $DIST = 'CLI-Meta-mv'; # DIST
our $VERSION = '0.001'; # VERSION
our $META = {
opts => {
'backup=s' => {completion=>[qw/none off numbered t existing nil simple never/]},
'b' => undef,
'force|f' => undef,
'interactive|i' => undef,
'no-clobber|n' => undef,
'strip-trailing-slashes' => undef,
view release on metacpan or search on metacpan
easyxs/ppport.h view on Meta::CPAN
av_top_index|5.017009|5.003007|p
av_top_index_skip_len_mg|5.025010||Viu
av_undef|5.003007|5.003007|
av_unshift|5.003007|5.003007|
ax|5.003007|5.003007|
backup_one_GCB|5.025003||Viu
backup_one_LB|5.023007||Viu
backup_one_SB|5.021009||Viu
backup_one_WB|5.021009||Viu
bad_type_gv|5.019002||Viu
bad_type_pv|5.016000||Viu
BADVERSION|5.011004||Viu
BASEOP|5.003007||Viu
BhkDISABLE|5.013003||xV
view release on metacpan or search on metacpan
examples/rs view on Meta::CPAN
my $optspec = {
'archive!' => 'Use archive mode--see manpage for rsync',
'checksum' => 'Use checksums instead of file times',
'compress!' => 'Enable compression',
'delete' => 'Delete extraneous files from the destination',
'dest=s' => 'Specify the destination of the copy or backup',
'devices!' => 'Copy device files. Implied by --archive',
'dry-run' => 'Just print what files would be copied; do not copy',
'exclude=s@' => 'Do not copy files matching this (these) pattern(s)',
'group!' => 'Preserve group ownership. Implied by --archive',
'include=s@' => 'Do not exclude files matching this (these) pattern(s)',
examples/rs view on Meta::CPAN
} while @ARGV;
__END__
=head1 NAME
rs - Wrapper for backups using rsync
=head1 SYNOPSIS
rs ;# Use default settings from $HOME/.rsrc
rs [options] [module ...] ;# Backup the named modules
examples/rs view on Meta::CPAN
A combination of options lets you invent custom "modes."
=item
A combination including C<--src> and C<--dest> helps you make routine backups.
=back
=back
=head2 Default Options
The default options are convenient for doing ad hoc copies using rsync with default
options. It lets you say this:
rs --src $HOME --dest backup:homedir/
instead of this:
rsync --archive --compress --delete --rsh ssh \
--src $HOME/ --dest backup:homedir/
If you usually use the latter combination of options, as I do, then
C<rs> can at least save you some typing.
=head2 Named Modules
examples/rs view on Meta::CPAN
default. The C<rsync> command supports the C<--archive> option, which represents
the grouping:
--recursive --links --perms --times --group --owner --devices --specials
Using C<rs>, you can define a new grouping called "backup" which adds additional
options, by putting the following in your config file:
[backup]
archive=1
compress=1
delete=1
rsh=ssh -2 -c arcfour -l backup_user -p 2222 -y -o BatchMode=yes
Now you can make a backup of your home directory simply by issuing the command:
rs backup --src $HOME/ --dest backup:homedir/
=head3 As Backup Tasks
If a grouping in your config file includes C<--src> and C<--dest> options, then
you can make a backup of a specific folder to a specific destination without
remembering combinations of options. For example, you can put this in your config
file:
[documents]
delete=1
exclude=*.tmp, *.bak, tmp/
src=/home/USERNAME/Documents/
dest=backup:Documents/
And now you can backup your C<Documents> folder by issuing the command:
rs documents
You can define multiple backup targets in this way, and then do all your
nightly backups in a single command, like this:
rs documents music pictures
=head3 Restoring from Backup
C<rs> also adds the C<--restore> option, which reverses the role of C<--src>
and C<--dest>. If you're using those options directly, you probably don't
want to use C<--restore> option to swap them, since that will only confuse
you. If you're using modules defined in the config file, however, and you
think of those modules as backups, then C<--restore> probably does exactly
what you think it does.
=head1 OPTIONS
=head2 --archive
examples/rs view on Meta::CPAN
by using the C<--no-compress> option.
=head2 --delete
Delete extraneous files in the destination folders. I<Not> enabled
by default, but for backup purposes you probably want to enable it.
=head2 --dest [ HOST:DIRECTORY | HOST: | DIRECTORY ]
Local or remote directory to copy I<to>. Mandatory unless one or more
modules are specified on the command line.
examples/rs view on Meta::CPAN
specifically disabled using the C<--no-recursive> option.
=head2 --restore
Reverse the roles of C<--src> and C<--dest>. If you think of C<rs>
as making a backup, then C<--restore> does just what you think it
does: it pulls from the backup destination and overwrites the
file or directory that you're normally backing up.
=head2 --rsh [command]
Command to use for remote access. Defaults to C<ssh>. A good
view release on metacpan or search on metacpan
lib/CMS/Drupal/Modules/MembershipEntity/Test.pm view on Meta::CPAN
cmp_ok( $add_term_rv, '>', 0, "Added a Term for $fields[0]" );
}
};
}; # done building the test DB
$dbh->sqlite_backup_to_file("$FindBin::Bin/data/.DB.sqlite");
return $dbh;
}
sub build_test_db {
lib/CMS/Drupal/Modules/MembershipEntity/Test.pm view on Meta::CPAN
for ( read_lines("$FindBin::Bin/data/test_terms.dat" ) ) {
my @fields = split(',');
my $add_term_rv = $dbh->do( $add_term, {}, @fields );
}
$dbh->sqlite_backup_to_file( "$FindBin::Bin/data/.DB.sqlite" );
return $dbh;
}
############################
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
corpus/dists/Perl-Critic.changes view on Meta::CPAN
* Added diagnostic messages if the .perlcriticrc contains entries
for Policy modules that don't seem to exist.
* Now you can specify which policies to disable with the
"## no critic" pseudo-pragmas. This feature is still
experimental. See docs for details.
* perlcritic's directory searching now skips backup files, such
as *.swp, *.bak and *~. It also ignores version control system
directories, and the blib directory in module build directories.
Bug Fixes:
* 18386: Bad example in POD for Documentation::RequirePodSections
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
lib/CPAN/InGit/MirrorTree.pm view on Meta::CPAN
extends 'CPAN::InGit::ArchiveTree';
has upstream_url => ( is => 'rw', coerce => \&_add_trailing_slash );
has upstream_backup_url => ( is => 'rw', lazy => 1, builder => 1, coerce => \&_add_trailing_slash );
has autofetch => ( is => 'rw', default => 1 );
has package_details_max_age => ( is => 'rw', default => 86400 );
sub _build_upstream_backup_url($self) {
($self->upstream_url||'') =~ m{^(https?)://www\.cpan\.org}
? "$1://backpan.perl.org/"
: undef;
}
lib/CPAN/InGit/MirrorTree.pm view on Meta::CPAN
defined $x? $x =~ s{/?\z}{/}r : $x
}
sub _pack_config($self, $config) {
$config->{upstream_url}= $self->upstream_url;
$config->{upstream_backup_url}= $self->upstream_backup_url;
$config->{autofetch}= $self->autofetch;
$config->{package_details_max_age}= $self->package_details_max_age;
$self->next::method($config);
}
sub _unpack_config($self, $config) {
$self->next::method($config);
$self->upstream_url($config->{upstream_url});
$self->upstream_backup_url($config->{upstream_backup_url})
if exists $config->{upstream_backup_url};
$self->autofetch($config->{autofetch});
$self->package_details_max_age($config->{package_details_max_age});
}
sub get_path($self, $path) {
lib/CPAN/InGit/MirrorTree.pm view on Meta::CPAN
unless defined $self->upstream_url;
my $url= $self->upstream_url . $path;
my $tx= $self->parent->useragent->get($url);
$log->debugf(" GET %s -> %s %s", $url, $tx->result->code, $tx->result->message);
unless ($tx->result->is_success) {
if ($self->upstream_backup_url && $path =~ m{^authors/id/}) {
my $url2= $self->upstream_backup_url . $path;
my $tx2= $self->parent->useragent->get($url2);
$log->debugf(" GET %s -> %s %s", $url2, $tx2->result->code, $tx2->result->message);
return \$tx2->result->body
if $tx2->result->is_success;
}
lib/CPAN/InGit/MirrorTree.pm view on Meta::CPAN
=head2 upstream_url
This is the base URL from which files will be fetched.
=head2 upstream_backup_url
This is a fallback URL for if the primary URL lacks a distribution file. The backup url is
presumed to have the exact same distribution files as the primary URL, but a longer history of
them. The package index of the backup URL is never used.
If the primary URL is C<< http://www.cpan.org >> then this will default to
C<< https://backpan.perl.org >>.
=head2 autofetch
view release on metacpan or search on metacpan
lib/CPAN/Mini/Inject/Config.pm view on Meta::CPAN
The main repository is on GitHub:
https://github.com/briandfoy/cpan-mini-inject
There are also backup repositories on several other services:
https://bitbucket.org/briandfoy/cpan-mini-inject
https://codeberg.org/briandfoy/cpan-mini-inject
https://gitlab.com/briandfoy/cpan-mini-inject
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
t/to-patch/Acme-CPAN-Patches.result/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.bat$
\bBuild.COM$
\bBUILD.COM$
\bbuild.com$
# Avoid temp and backup files.
~$
\.old$
\#$
\b\.#
\.bak$
view release on metacpan or search on metacpan
through all sources instead of just through the %doc files.
- modifications to make setuid-safe
- changes to output format (for web support)
- failures to retrieve a tarball now abort the script
- package descriptions are now culled from DESCRIPTION header in the POD
and only as a backup is SYNOPSIS used
- default/suggested value for --mk-rpm-dirs is now ~/rpm
- added SuSE 9.0 to supported list
- In SLES8 (SuSE Linux Enterprise Server) the intel version has no
/etc/SuSE-release but uses /etc/UnitedLinux-release. thx for the tip to
Tzafrir Cohen <tzafrir@technion.ac.il>
view release on metacpan or search on metacpan
corpus/PL-ConfigRequires/MANIFEST.SKIP view on Meta::CPAN
\b_build
# Avoid Devel::Cover generated files
\bcover_db
# Avoid temp and backup files.
~$
\.tmp$
\.old$
\.bak$
\#$
view release on metacpan or search on metacpan
lib/CPAN/Site/Index.pm view on Meta::CPAN
if $fallback;
create_details $details, $newlist, $mypkgs, $lazy, $undefs;
if(-f $details)
{ trace "backup old details file to $details.bak";
safe_copy $details, "$details.bak";
}
if(-f $newlist)
{ trace "promoting $newlist to current";
view release on metacpan or search on metacpan
bin/addresses.pl view on Meta::CPAN
[--verbose|v] --config|c=<file> \
( [--help|h] \
| [--update=<file>] \
| [--reindex] [--lastid=<num>] \
| [--clean] \
| [--backup] \
| [--mailrc|m=<file>] [--month=<string>] [--match] ) \
[--logfile=<file>] [--logclean=(0|1)]
=head1 DESCRIPTION
Using the cpanstats database, this program can be used to update, reindex,
backup and search the tester address tables.
When searching, the program tries to match unmatched tester addresses to either
a cpan author or an already known tester. For the remaining addresses, an
attempt at pattern matching is made to try and identify similar addresses in
the hope they can be manually identified.
view release on metacpan or search on metacpan
lib/CPAN/Testers/Data/Release.pm view on Meta::CPAN
__PACKAGE__->mk_accessors(qw( idfile logfile logclean ));
sub process {
my $self = shift;
if($self->{clean}) { $self->clean() }
elsif($self->{RELEASE}{exists}) { $self->backup_from_last() }
else { $self->backup_from_start() }
}
sub backup_from_last {
my $self = shift;
$self->_log("Find new start");
my $lastid = 0;
lib/CPAN/Testers/Data/Release.pm view on Meta::CPAN
}
$self->_log("Backup completed");
}
sub backup_from_start {
my $self = shift;
my $lastid = 0;
$self->_log("Create backup database");
# start with a clean slate
$self->{RELEASE}{dbh}->do_query($phrasebook{'DeleteTable'});
$self->{RELEASE}{dbh}->do_query($phrasebook{'CreateTable'});
$self->{RELEASE}{dbh}->do_query($phrasebook{'CreateDistIndex'});
$self->{RELEASE}{dbh}->do_query($phrasebook{'CreateVersIndex'});
$self->_log("Generate backup data");
# store data from master database
my %data;
my $dist = '';
my $rows = $self->{CPANSTATS}{dbh}->iterator('hash',$phrasebook{'SelectAll'});
lib/CPAN/Testers/Data/Release.pm view on Meta::CPAN
=item * process
Shorthand function to run methods based on command line options.
=item * backup_from_last
Run backup processes from the last known update.
=item * backup_from_start
Run backup processes recreating the complete backup database from scratch.
=item * clean
Run database table clean processes.
view release on metacpan or search on metacpan
examples/uploads.pl view on Meta::CPAN
uploads.pl - creates, updates and/or backs up the uploads database.
=head1 SYNOPSIS
perl uploads.pl --config=<file> (-generate | -update | -backup | -h | -v)
=head1 DESCRIPTION
This program allows the user to create, update and backup the uploads database,
either as separate commands, or a combination of all three. The process order
will always be CREATE->UPDATE->BACKUP, regardless of the order the options
appear on the command line.
The Uploads database contains basic information about the history of CPAN. It
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
vhost/dumper.sh view on Meta::CPAN
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert cpanadmin >cgi-bin/db/cpanadmin-backup.sql
#mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert cpanstats ixaddress tester_address tester_profile >cgi-bin/db/tester-backup.sql
#mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert testers >cgi-bin/db/testers-backup.sql
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert --no-data cpanadmin >cgi-bin/db/cpanadmin-schema.sql
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert --no-data testers >cgi-bin/db/testers-schema.sql
#mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert testers profile address >cgi-bin/db/testers-profile.sql
view release on metacpan or search on metacpan
vhost/dumper.sh view on Meta::CPAN
mysqldump -u secret -p --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert cpanblog >cgi-bin/db/cpanblog-backup.sql
mysqldump -u secret -p --create-options --add-drop-table --no-data cpanblog >cgi-bin/db/cpanblog-schema.sql
view release on metacpan or search on metacpan
vhost/dumper.sh view on Meta::CPAN
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert cpanprefs >cgi-bin/db/cpanprefs-backup.sql
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert --no-data cpanprefs >cgi-bin/db/cpanprefs-schema.sql
view release on metacpan or search on metacpan
vhost/dumper.sh view on Meta::CPAN
#mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert reports >cgi-bin/db/reports-backup.sql
#mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert reports monitor >cgi-bin/db/monitor.sql
mysqldump -u barbie --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert --ignore-table=reports.hits --ignore-table=reports.sessions reports >cgi-bin/db/reports-backup.sql
mysqldump -u barbie --create-options --add-drop-table --no-data reports >cgi-bin/db/reports-schema.sql
view release on metacpan or search on metacpan
t/data/cpanstats-test.json view on Meta::CPAN
{"test":{"count":{"entries":100,"reports":100,"posters":"182","distros":0},"pass":{"MacPPC":{"5.4.0":{"all":{"Net-Whois":1,"URI":1,"Storable":1,"Mac-Conversions":1,"Digest-MD5":1}}},"PA-RISC1.1":{"5.5.3":{"all":{"DBD-Oracle":1,"Curses":1}},"5.4.4":{"...
view release on metacpan or search on metacpan
vhost/dumper.sh view on Meta::CPAN
mysqldump -u secret -p --skip-add-locks --add-drop-table --skip-disable-keys --skip-extended-insert cpanwiki >cgi-bin/db/cpanwiki-backup.sql
mysqldump -u secret -p --create-options --add-drop-table --no-data cpanwiki >cgi-bin/db/cpanwiki-schema.sql
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
\b_build
\bBuild.COM$
\bBUILD.COM$
\bbuild.com$
# Avoid temp and backup files.
~$
\.old$
\#$
^\.#
\.bak$
view release on metacpan or search on metacpan
lib/App/Cpan.pm view on Meta::CPAN
Do not test modules. Simply install them.
=item -u
Upgrade all installed modules. Blindly doing this can really break things,
so keep a backup.
=item -v
Print the script version and CPAN.pm version then exit.