Select Code to Download

$ time perl -e 'use strict;
> use warnings;
...
real    0m0.044s
user    0m0.015s
sys     0m0.031s

$ time perl solver.pl
Result is: 8.0000000000
...
real    0m0.050s
user    0m0.031s
sys     0m0.015s