diff options
| author | Heiko Schlittermann (HS12-RIPE) <hs@schlittermann.de> | 2017-03-02 00:00:41 +0100 |
|---|---|---|
| committer | Heiko Schlittermann (HS12-RIPE) <hs@schlittermann.de> | 2017-03-12 23:30:45 +0100 |
| commit | 4d8393c0433106c18f19b43287fee86d189378a5 (patch) | |
| tree | f6a47e8e7aa9571475c3ad0820b8c7b801085466 /test/lib | |
| parent | ffe0a3577e7b6d490354137ca1aa6e6a9d536c14 (diff) | |
Testsuite: add --test and --range options
Diffstat (limited to 'test/lib')
| -rw-r--r-- | test/lib/Exim/Utils.pm | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/test/lib/Exim/Utils.pm b/test/lib/Exim/Utils.pm new file mode 100644 index 000000000..b744b0b43 --- /dev/null +++ b/test/lib/Exim/Utils.pm @@ -0,0 +1,16 @@ +package Exim::Utils; +use v5.10.1; +use strict; +use warnings; +use parent 'Exporter'; +our @EXPORT_OK = qw(uniq numerically); + + +sub uniq { + my %uniq = map { $_, undef } @_; + return keys %uniq; +} + +sub numerically { $::a <=> $::b } + +1; |