Select Code to Download

#! perl -slw
use strict;
...
}
printf "Took %.9f seconds.\n", time() - $start;

C:\test>luhn
4011350000000008: 8
...
4011350000000081: 1
4011350000000099: 9
Took 0.697062969 seconds.