Perl6 one liners, vol 3: Print n over m, or the binomial coefficient for n and m

binomial-coefficient.sh

# The first argument will be n and entered into the $^ß placeholder, the second into the $^þ placeholder
perl6 -e 'say { ([*] 1..$^ß ) / ( [*] 1..$^þ) * ([*] 1..($^ß - $^þ)) }(@*ARGS[0],@*ARGS[1])' 20 11
# [*] 1..$^ß ) will compute the factorial by creating a range 1..$^ß and then multiplying all of them together. 
# @*ARGS contains the arguments handled to the script; @*ARGS[0] will be the first and so on.