sub factorial { $_[0] == 1 ? 1 : $_[0] * factorial($_[0] - 1) }

##</code><code>##

------------
:Wq
Not an editor command: Wq