#!/usr/bin/env /friends/.rakudobrew/bin/perl6
{ $^n < 2 ?? 1 !! $^n * &?BLOCK($^n-1) }(10).say