13:38 >perl -E "$a=1;say$a*=++$}for a..k" 1 2 6 24 120 720 5040 40320 362880 3628800 39916800 13:38 >