1Test::Timer(3) User Contributed Perl Documentation Test::Timer(3)
2
6 Test::Timer - test module to test/assert response times
7
9 The documentation describes version 2.10 of Test::Timer
10
12 · Test subroutines to implement unit-tests to time that your code
13 executes before a specified threshold
14 · Test subroutines to implement unit-tests to time that your code
16 execution exceeds a specified threshold
17 · Test subroutine to implement unit-tests to time that your code
19 executes within a specified time frame
20 · Supports measurements in seconds
22 · Implements configurable alarm signal handler to make sure that your
24 tests do not execute forever
25
27 use Test::Timer;
28 time_ok( sub { doYourStuffButBeQuickAboutIt(); }, 1, 'threshold of one second');
30 time_atmost( sub { doYourStuffYouHave10Seconds(); }, 10, 'threshold of 10 seconds');
32 time_between( sub { doYourStuffYouHave5-10Seconds(); }, 5, 10,
34 'lower threshold of 5 seconds and upper threshold of 10 seconds');
35 # Will succeed
37 time_nok( sub { sleep(2); }, 1, 'threshold of one second');
38 time_atleast( sub { sleep(2); }, 2, 'threshold of one second');
40 # Will fail after 5 (threshold) + 2 seconds (default alarm)
42 time_ok( sub { while(1) { sleep(1); } }, 5, 'threshold of one second');
43 $test::Timer::alarm = 6 #default 2 seconds
45 # Will fail after 5 (threshold) + 6 seconds (specified alarm)
47 time_ok( sub { while(1) { sleep(1); } }, 5, 'threshold of one second');
48
50 Test::Timer implements a set of test primitives to test and assert test
51 times from bodies of code.
52 The key features are subroutines to assert or test the following:
54 · that a given piece of code does not exceed a specified time limit
56 · that a given piece of code takes longer than a specified time limit
58 and does not exceed another
59
61 Test::Timer exports:
62 · time_ok
64 · time_nok
66 · time_atleast
68 · time_atmost
70 · time_between
72
74 time_ok
75 Takes the following parameters:
76 · a reference to a block of code (anonymous sub)
78 · a threshold specified as a integer indicating a number of seconds
80 · a string specifying a test name
82 time_nok( sub { sleep(2); }, 1, 'threshold of one second');
84 If the execution of the code exceeds the threshold specified the test
86 fail with the following diagnostic message
87 Test ran 2 seconds and exceeded specified threshold of 1 seconds
89 time_nok
91 The is the inverted variant of time_ok, it passes if the threshold is
92 exceeded and fails if the benchmark of the code is within the specified
93 timing threshold.
94 The API is the same as for time_ok.
96 time_nok( sub { sleep(1); }, 2, 'threshold of two seconds');
98 If the execution of the code executes below the threshold specified the
100 test fail with the following diagnostic message
101 Test ran 1 seconds and did not exceed specified threshold of 2 seconds
103 time_atmost
105 This is syntactic sugar for time_ok
106 time_atmost( sub { doYourStuffButBeQuickAboutIt(); }, 1, 'threshold of one second');
108 If the execution of the code exceeds the threshold specified the test
110 fail with the following diagnostic message
111 Test ran N seconds and exceeded specified threshold of 1 seconds
113 N will be the actual measured execution time of the specified code
115 time_atleast
117 time_atleast( sub { doYourStuffAndTakeYourTimeAboutIt(); }, 1, 'threshold of 1 second');
118 The test succeeds if the code takes at least the number of seconds
120 specified by the timing threshold.
121 If the code executes faster, the test fails with the following
123 diagnostic message
124 Test ran 1 seconds and did not exceed specified threshold of 2 seconds
126 Please be aware that Test::Timer, breaks the execution with an alarm
128 specified to trigger after the specified threshold + 2 seconds
129 (default), so if you expect your execution to run longer, set the alarm
130 accordingly.
131 $Test::Timer::alarm = $my_alarm_in_seconds;
133 See also diagnostics.
135 time_between
137 This method is a more extensive variant of time_atmost and time_ok, you
138 can specify a lower and upper threshold, the code has to execute within
139 this interval in order for the test to succeed
140 time_between( sub { sleep(2); }, 5, 10,
142 'lower threshold of 5 seconds and upper threshold of 10 seconds');
143 If the code executes faster than the lower threshold or exceeds the
145 upper threshold, the test fails with the following diagnostic message
146 Test ran 2 seconds and did not execute within specified interval 5 - 10 seconds
148 Or
150 Test ran 12 seconds and did not execute within specified interval 5 - 10 seconds
152
154 _runtest
155 This is a method to handle the result from _benchmark is initiates the
156 benchmark calling benchmark and based on whether it is within the
157 provided interval true (1) is returned and if not false (0).
158 _benchmark
160 This is the method doing the actual benchmark, if a better method is
161 located this is the place to do the handy work.
162 Currently Benchmark is used. An alternative could be Devel::Timer, but
164 I do not know this module very well and Benchmark is core, so this is
165 used for now.
166 The method takes two parameters:
168 · a code block via a code reference
170 · a threshold (the upper threshold, since this is added to the
172 default alarm
173 import
175 Test::Builder required import to do some import hokus-pokus for the
176 test methods exported from Test::Timer. Please refer to the
177 documentation in Test::Builder
178
180 All tests either fail or succeed, but a few exceptions are implemented,
181 these are listed below.
182 · Test did not exceed specified threshold, this message is diagnosis
184 for time_atleast and time_nok tests, which do not exceed their
185 specified threshold
186 · Test exceeded specified threshold, this message is a diagnostic for
188 time_atmost and time_ok, if the specified threshold is surpassed.
189 This is the key point of the module, either your code is too slow
191 and you should address this or your threshold is too low, in which
192 case you can set it a bit higher and run the test again.
193 · Test did not execute within specified interval, this is the
195 diagnostic from time_between, it is the diagnosis if the execution
196 of the code is not between the specified lower and upper thresholds
197 · Insufficient parameters, this is the message if a specified test is
199 not provided with the sufficient number of parameters, consult this
200 documentation and correct accordingly
201 · Execution exceeded threshold and timed out, the exception is thrown
203 if the execution of tested code exceeds even the alarm, which is
204 default 2 seconds, but can be set by the user or is equal to the
205 upper threshold + 2 seconds
206 The exception results in a diagnostic for the failing test. This is
208 a failsafe to avoid that code runs forever. If you get this
209 diagnose either your code is too slow and you should address this
210 or it might be error prone. If this is not the case adjust the
211 alarm setting to suit your situation.
212
214 This module requires no special configuration or environment.
215 Tests are sensitive and be configured using environment and
217 configuration files, please see the section on test and quality.
218
220 · Carp
221 · Benchmark
223 · Error
225 · Test::Builder
227 · Test::Builder::Module
229
231 This module holds no known incompatibilities.
232
234 This module holds no known bugs.
235 The current implementations only use seconds and resolutions should be
237 higher, so the current implementation is limited to seconds as the
238 highest resolution.
239 On occasion failing tests with CPAN-testers have been observed. This
241 seem to be related to the test-suite being not taking into account that
242 some smoke-testers do not prioritize resources for the test run and
243 that additional processes/jobs are running. The test-suite have been
244 adjusted to accommodate this but these issues might reoccur.
245
247 Coverage report for the release described in this documentation (see
248 VERSION).
249 ---------------------------- ------ ------ ------ ------ ------ ------ ------
251 File stmt bran cond sub pod time total
252 ---------------------------- ------ ------ ------ ------ ------ ------ ------
253 blib/lib/Test/Timer.pm 100.0 95.0 66.6 100.0 100.0 99.9 98.0
254 ...Timer/TimeoutException.pm 100.0 n/a n/a 100.0 100.0 0.0 100.0
255 Total 100.0 95.0 66.6 100.0 100.0 100.0 98.4
256 ---------------------------- ------ ------ ------ ------ ------ ------ ------
257 The Test::Perl::Critic test runs with severity 5 (gentle) for now,
259 please refer to t/critic.t and t/perlcriticrc.
260 Set TEST_POD to enable Test::Pod test in t/pod.t and
262 Test::Pod::Coverage test in t/pod-coverage.t.
263 Set TEST_CRITIC to enable Test::Perl::Critic test in t/critic.t
265 CONTINUOUS INTEGRATION
267 This distribution uses Travis for continuous integration testing, the
268 Travis reports are public available.
269
271 · Test::Benchmark
272
274 Please report any bugs or feature requests using Github
275 · Github Issues <https://github.com/jonasbn/perl-test-timer/issues>
277
279 You can find (this) documentation for this module with the "perldoc"
280 command.
281 perldoc Test::Timer
283 You can also look for information at:
285 · Homepage <https://jonasbn.github.io/perl-test-timer/>
287 · MetaCPAN <https://metacpan.org/pod/Test-Timer>
289 · AnnoCPAN: Annotated CPAN documentation
291 <http://annocpan.org/dist/Test-Timer>
292 · CPAN Ratings <http://cpanratings.perl.org/d/Test-Timer>
294
296 · Github Repository <https://github.com/jonasbn/perl-test-timer>,
297 please see the guidelines for contributing
298 <https://github.com/jonasbn/perl-test-
299 timer/blob/master/CONTRIBUTING.md>.
300
302 · Jonas B. Nielsen (jonasbn) "<jonasbn at cpan.org>"
303
305 · Mohammad S Anwar, POD corrections PRs #23
306 · Erik Johansen, suggestion for clearing alarm
308 · Gregor Herrmann from the Debian Perl Group, PR #16 fixes to
310 spelling mistakes
311 · Nigel Horne, issue #15 suggestion for better assertion in
313 time_atleast
314 · Nigel Horne, issue #10/#12 suggestion for improvement to
316 diagnostics
317 · p-alik, PR #4 eliminating warnings during test
319 · Kent Fredric, PR #7 addressing file permissions
321 · Nick Morrott, PR #5 corrections to POD
323 · Bartosz Jakubski, reporting issue #3
325 · Gabor Szabo (GZABO), suggestion for specification of interval
327 thresholds even though this was obsoleted by the later introduced
328 time_between
329 · Paul Leonerd Evans (PEVANS), suggestions for time_atleast and
331 time_atmost and the handling of $SIG{ALRM}. Also bug report for
332 addressing issue with Debian packaging resulting in release 0.10
333 · brian d foy (BDFOY), for patch to _runtest
335
337 Test::Timer and related modules are (C) by Jonas B. Nielsen, (jonasbn)
338 2007-2019
339 Test::Timer and related modules are released under the Artistic License
341 2.0
342 Used distributions are under copyright of there respective authors and
344 designated licenses
345 Image used on website <https://jonasbn.github.io/perl-test-timer/> is
347 under copyright by Veri Ivanova
348 <https://unsplash.com/photos/p3Pj7jOYvnM>
349perl v5.30.1 2020-01-30 Test::Timer(3)