say ~((1-get) <<*<<(my$_=get.words) >>+>>.sum)