Elixir Rock Paper Scissors

gistfile1.txt

import String
import Enum
l= ~w{r p s}
m=IO.gets ""
n=m|>strip|>split("",trim: true)
if any?(n,fn(x)->!member?(l,x)end)do
else
  f = fn()->random l end
  o = [f.(), f.(), f.()]
  IO.puts o
  g=fn(x)->case x do
      {x,x}->0
      {"r","s"}->1
      {"p","r"}->1
      {"s","p"}->1
      _->-1
    end
  end
  case zip(n,o)|>map(g)|>sum do
    0->"Draw"
    x when x > 0->"Win"
    _->"Lose"
  end
end