1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
Run::Parts — run-parts in Perl
==============================
[](https://travis-ci.org/xtaran/run-parts)
[](https://coveralls.io/r/xtaran/run-parts)
The [Perl module `Run::Parts`](https://metacpan.org/release/Run-Parts)
offers the functionality of Debian's `run-parts` tool in Perl.
`Run::Parts` runs all the executable files named within constraints
described in `run-parts(8)` and `Run::Parts::Perl`, found in the given
directory. Other files and directories are silently ignored.
Additionally it can just print the names of the all matching files
(not limited to executables, but ignores blacklisted files like
e.g. backup files), but don't actually run them.
This is useful when functionality or configuration is split over
multiple files in one directory. A typical convention is that
the directory name ends in ".d". Common examples for such
splitted configuration directories:
/etc/cron.d/
/etc/apt/apt.conf.d/
/etc/apt/sources.list.d/,
/etc/aptitude-robot/pkglist.d/
/etc/logrotate.d/
/etc/rsyslog.d/
Example Code
------------
```perl
use Run::Parts;
my $rp = Run::Parts->new('directory'); # chooses backend automatically
my $rpp = Run::Parts->new('directory', 'perl'); # pure perl backend
my $rpd = Run::Parts->new('directory', 'debian'); # uses /bin/run-parts
my @file_list = $rp->list;
my @executables_list = $rpp->test;
my $commands_output = $rpd->run;
...
```
Backends
--------
`Run::Parts` contains two backend implementations.
`Run::Parts::Debian` actually uses `/bin/run-parts` and
`Run::Parts::Perl` is a pure Perl implementation of a basic set of
`run-parts`' functionality.
`Run::Parts::Debian` may or may not work with RedHat's simplified
shell-script based reimplementation of Debian's `run-parts`.
By default `Run::Parts` uses `Run::Parts::Debian` if `/bin/run-parts`
exists, `Run::Parts::Perl` otherwise. But you can also choose any of
the backends explicitly.
Author, License and Copyright
-----------------------------
Copyright 2013-2014 Axel Beckert <abe@deuxchevaux.org>.
This program is free software; you can redistribute it and/or modify
it under the terms of either: the
[GNU General Public License](https://www.gnu.org/licenses/gpl) as
published by the [Free Software Foundation](https://www.fsf.org/),
either [version 1](https://www.gnu.org/licenses/old-licenses/gpl-1.0),
or (at your option)
[any later version](https://www.gnu.org/licenses/#GPL); or the
[Artistic License](http://dev.perl.org/licenses/artistic.html).
See http://dev.perl.org/licenses/ for more information.
|
