Select Code to Download

#!/usr/bin/perl
use 5.014;
# 9913950mod
...
Cogteeth:  42 32 22

=cut

#!/usr/bin/perl
use 5.014;
use warnings FATAL => qw(all);
...
}

pp($gear);

[
  [6.94047619047619, 9.109375, 13.25],
  [8.20238095238095, 10.765625, 15.6590909090909]
...
  [17.6666666666667, 23.1875, 33.7272727272727],
  [20.1904761904762, 26.5, 38.5454545454545],
]