Exception Cost Test
Language
Perl
Compiler
perl 5.38.0
Options
Exception Cost Test
$ perl prog.pl measureNoExceptionCost: Exceptions: 0, NoExceptions: 1000000, Duration: 415.51 ms
measureExceptionCost: Probability: 0.00%, Exceptions: 0, NoExceptions: 1000000, Duration: 420.17 ms
measureExceptionCost: Probability: 1.00%, Exceptions: 10126, NoExceptions: 989874, Duration: 425.75 ms
measureExceptionCost: Probability: 99.00%, Exceptions: 990030, NoExceptions: 9970, Duration: 667.70 ms
Exit Code:
0