3 use warnings FATAL => 'all';
7 if (!eval { require 5.016; 1 }) {
8 plan skip_all => "This test requires 5.16";
14 use Function::Parameters;
20 return $n * __SUB__->($n - 1);
25 is(fun ($n = 8) { $n < 2 ? 1 : $n * __SUB__->($n - 1) }->(), 40320);
31 return $n * fact2($n - 1);