RT72688 - Benchmark.t test 24 bug when the testing system is under load.
authorTodd Rinaldo <toddr@cpan.org>
Fri, 13 May 2011 05:39:22 +0000 (22:39 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 18 May 2011 22:37:19 +0000 (15:37 -0700)
lib/Benchmark.t

index c29ed1a..e54d829 100644 (file)
@@ -122,7 +122,7 @@ is ($auto, $default, 'timestr ($diff, "auto") matches timestr ($diff)');
     is (timestr ($diff, 'none'), '', "none suppresses output");
 
     my $noc = timestr ($diff, 'noc');
-    like ($noc, qr/$wallclock +wallclock secs? +\( *$usr +usr +\+ +$sys +sys += +$cpu +CPU\)/, 'timestr ($diff, "noc")');
+    like ($noc, qr/$wallclock +wallclock secs? +\( *$usr +usr +\+ +$sys +sys += +\d+\.\d\d +CPU\)/, 'timestr ($diff, "noc")');
 
     my $nop = timestr ($diff, 'nop');
     like ($nop, qr/$wallclock +wallclock secs? +\( *$cusr +cusr +\+ +$csys +csys += +\d+\.\d\d +CPU\)/, 'timestr ($diff, "nop")');